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When we brought our first computer home, our older son first learned how to run and pro- § 

gram it. I explained the various parts, commands and got him started programming with a ^ 

promise of his own computer once he had mastered the essential commands and statements. © 

Like all 9 year olds, his main interest was in arcade games, and slowly he began wondering S 

how he could make his own game. After some extensive work with the computer, he de- © 

veloped a rudimentary adventure game, being led by an interest in making the adventure, & 

rather than the pure joy I always felt in mastering the puzzle of programming. |t 

Shortly after our older son became adept at working and programming his computer, his ga 

younger brother wanted to learn as well. I mumbled encouragement and went back to a mat- M 

ter engrossing my attention at the time, and decided in the back of my mind to get around to § 

helping him learn how to use the computer "soon." The next day I noticed that he was already c=J 

using it, without my "expertise." I asked him if his older brother knew about his using the com- © 

puter, and he explained that it was his brother who had taught him how to work it. Later on, I H 

found that the older brother could communicate with his younger brother in a way that was M 
clear, concise, and to the point. 

Kids have always communicated better with one another than with adults, and this was « 
simply another instance of that phenomenon. Also, kids seem to learn quickly from one 
another. Adults have ideas about what really interests kids, and sometimes they are right. 

However, kids just about always know about their mutual interests. And kids never want to be ® 

told by adults what is good for them. Since the passing on of valued knowledge from kids to ji 
kids has been going on since the first cave kid told another about the best trees to climb, why 

not apply that process to learning about computers? After all, if one kid knows the "neatest" (if § 

they still use that term) thing to do with a computer and how to program it, why not let him or f| 
her explain the whole process to another kid? 
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This book was born with the idea that kids can teach other kids better than anyone else. 
Adult intervention on my part was to give aid and assistance where required, and do all of the 
grimy work of formatting, correcting, and encouraging. To my surprise and delight, I was not 
overburdened with editorial tasks, as I had feared. The two young authors dove into their 
project with enthusiasm and ideas that seemed bottomless. Their energy level was always 
high, and discussions and phone calls concerning their opus occurred at all times of the day 
and night. 

The level of the book is introductory, but the authors did include some more advanced 
concepts near the end. This was done so that they could include some games and other pro- 
grams they felt kids would enjoy. Otherwise, most of the material is designed to help kids get 
started using and programming their Color Computer. 

The two authors, Billy Sanders and Sam Edge are 1 1 and 1 7 years old, respectively. They 
wanted me to include several people who helped them. First, Billy wants to thank Eric Goez 
for originally suggesting he create the book, Phil Williams of Kraft Systems Company for giv- 
ing him a Kraft Joystick to help develop programs using the joystick, his brother David, and his 
parents. Sam would like to thank Don Carothers, Kammie Williams for her support, and the 
guys from Practical Computing for their general assistance. Sam is also very grateful to his 
mother for all of her understanding support. Finally, as editor, I would like to thank Billy and 
Sam for doing such an excellent job. 
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GETTING SET 

Hi, we're Billy Sanders and Sam Edge. We are kids 
like you (1 1 and 17 years old). That's why this book is 
called KIDS TO KIDS ON THE COLOR COMPUTER. 
It's a book for kids from two kids' points of view. We 
hope this will help you understand how to use your 
Color Computer. Let's get started by setting up your 
computer and TV set. 

First, you hook up the TV set to the computer. You do 
that by taking a little box, called a switch box, out of 
the box you got your computer in. Take the antenna 
piece from the switch box and hook it up in back of your 
TV set where the little screws are, and where it says 
VHF. 

There should be a long gray cord in the box your 
computer came in. Hook one end up to the switch box 
and the other end up to the computer where it says TO 
TV. On the back of the computer is a switch for Channel 
3 or Channel 4. In some towns, Channel 3 is best, and in 
others, Channel 4 is best. Turn the switch to Channel 3 
or Channel 4 and turn your TV channel selector to 
Channel 3 or Channel 4. 






B 
^ 







<=§ 



C=3 



■=3 



^ 







DJL ©niESfl ®JL S(DM 



DJL ©(fflHSfl ®H ©(ffllffil 



^ 



msm ®j 



djl ©mm ®jl scorns 



USD ©jl ©cm' 

1 1 



BS TO KMDS TO MIE© TO DSOffi)© TO MPS TO IMDS TO OSDIK 



SDffi* 



IBS TO QSIIBS TTO 



^ 



C3 



C=3 



69 



&=> 



COLOR BASIC 1.0 

COPYRIGHT (®) 1981 BY TANDY 

UNDER LICENSE FROM MICROSOFT 



E=" 












DCH1D5D am. s« 
12 



Now that you have hooked up the TV to the com- 
puter, plug the computer into the wall. You do that by 
taking a cord from the computer and plugging it into the 
nearest wall outlet. 

Next, to turn it on you simply press a little button on 
the left side of the computer. When you have done that, 
on the top of the screen it should say something like. 



The exact message will depend on when you got 
your computer and whether or not you have Extended 
BASIC installed. When you are done with that, play with 
it for a while. Press some different keys to see what 
happens. 

Some of the keys you have are regular keys and 
some are irregular. You may know the keys from A-Z 
pretty well. Also, you know the number keys and their 
shift statements like !"#$%&'( )*:=-@ +;?/>.<„ But 
what about the up, down, left, and right arrows, and the 
ENTER, CLEAR and BREAK keys? Here is what they 
do. The up arrow key makes an arrow like this f . Press 
shift and the up arrow and it will make a right arrow key 
like this: -*- . Press shift down arrow key and it will make a 
left bracket, and the shift right arrow key makes a right 
bracket. Press the left arrow key and it will delete the last 
word you typed and/or it will go back one space. Press 
shift zero and it will switch back and forth between lower 
case and upper. With lower case, instead of having black 
on green it will be green on black. (Note: It will show 
lowercase only when you print it out on a printer.) Press 
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shift @ and the computer will pause and then continue 
when you press any other key. Press shift left arrow key 
and it will delete the current line. Press the CLEAR key 
and it will clear the whole screen; if you are working on a 
program and you are not done with it, that line will be 
deleted and won't be seen again unless you write it 
again. 

Press the ENTER key and that will end a program 
line. Press the BREAK key and that will interrupt the line 
that the program is on. For instance, if you are running a 
program and press the BREAK key, it will say BREAK 
I N 20 or some other line number. Write in this program 
to see how it works. 



Now you should have the computer hooked up to 
the TV and you should know what all the keys mean. In 
the next chapter you will learn how to use the cassette 
recorder. 
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10CLS<ENTER> 
20 PRINT "COMPUTER" 
30 GOTO 20 <ENTER> 
RUN <ENTER> 
<PRESS BREAK KEY> 
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HOW TO USE 

THE CASSETTE RECORDER 

AND THE DISK DRIVE 

In this chapter you will be learning how to use the 
cassette recorder first and the disk drive second. If you 
want to use your cassette recorder, you have to hook it 
up first. Turn off your computer and TV. In fact, you 
should unplug both to be certain. The cord for the 
recorder has a black box on the end of it that plugs into 
the wall. Take the other end and hook that up to the 
cassette recorder where it says 120V. (Note: We would 
strongli; recommend that you buy the Radio Shack 
TRS-80 Computer Cassette Recorder since not every 
cassette recorder will work with your computer.) Next, 
find the cord with three other cords attached to it. Plug 
the big end into the computer where it says CASSETTE. 
Then on the other end of the cord you will find three 
other connectors. Plug the black one into the spot where 
it says EAR. Then, with the two gray cords, plug the left 
one into the spot where it says MIC and plug the other 
one into the spot where it says AUX. Now plug in the 
computer, TV, and recorder and turn them all on. 
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Now that you have hooked it up and turned on, 
here's how to use it. (You will need a tape with programs 
on it. If you have no such tapes, get a blank tape and skip 
to the next section that explains how to save a program 
to tape.) The first word we will introduce to you is 
CLOAD. CLOAD means Cassette LOAD. How it works 
is simple. Put your tape with some programs on it in your 
recorder. You type CLOAD, quotes, the program's 
name, and then ending quotes. 

CLOAD "PROGRAM" <-Use the actual name of the 
program. 

Now press PLAY on your cassette recorder. Then 
just press ENTER. (Note: Make sure that you have fast 
forwarded the tape or rewound it to the program you 
want. If this is not done, the computer will go searching 
for the program until it has found it or gives up. You 
have to watch the cassette counter. Those are the num- 
bers on the cassette recorder that tell where the tape is. 
By writing down the numbers of the cassette counter, 
you can tell where your program begins. Then you don't 
have to wait all day for the recorder to find your pro- 
gram.) The recorder's red light should go on, and it will 
start moving forward. When it says K on the top of the 
screen, type RUN and press ENTER; you will have your 
program working. If you get an error when you type 
CLOAD, try typing CLOADM. You use it the same way 
you use CLOAD, but when you're finished with your 
program type EXEC. 
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10CLS 

20 PRINT "SAVE ME" 

30 END 



One very helpful command when you are using the 
cassette recorder is SKIPF"X". SKIPF"X" searches 
through the whole tape until it gets to the end. The com- 
puter will print every program that is on that tape at the 
top of the screen. To locate a program using SKIPF"X", 
watch the program counter. When the name of a pro- 
gram appears on the screen, look at the cassette counter 
and write it down along with the program name. Then 
you can keep track of the programs' locations if you 
forgot to do it when you first wrote the program. 

Sometimes the computer will give you an 10 error 
because the program is not found or the cassette is not 
hooked up right. If that happens, make sure your cassette 
recorder is connected where it should be. 

SAVING PROGRAMS ON TAPE 

So far you have learned how to load programs and 
search for them. How about learning how to save pro- 
grams? Saving programs is simple. When you are finished 
with a program and you want to save it, all you do is type 
CSAVE, quotes, (") what your program's name is, and 
then ending quotes ("). See how easy it is! Enter the 
example program and use it for practice. At the end of 
every line press the ENTER key. (If this is your only pro- 
gram, go back to the section on CLOAD and practice 
loading the program.) 






CSAVE "THIS PROGRAM" <-Use your program's real 
name. 
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DISK DRIVE 

q If you do not have a disk drive, you can skip to the 

&=> next section. If you do not have extended BASIC in your 

jg computer, your disk drive will not work; so if you have a 

§ disk system, go have Radio Shack put the EXTENDED 

" BASIC chip in for you. It costs about $100. 
P To use your Disk Drive, you first have to hook it up. 

Be sure to first unplug your computer and disk drive. 

Q You simply take the disk cartridge that looks like a flat 

H black box and put it into the slot on the right side of the 

q computer. Connect the flat ribbon cable from the disk 

1=3 drive to the cartridge. Last, plug in the power cord to a 

m wall outlet. Once you have finished that, find the little 

H switch in the back of the disk drive turn and it on. Now 

^ that you have your disk drive all hooked up, you will 

© learn how to use the it. As a reminder, before you do that 

^ you must make sure you have extended BASIC. You 

H will learn more about extended BASIC in Chapter 15. 
pj Once you have connected your drive, you have to 

format a disk for it to work. You format a disk by typing 
l=i DSKINI0. When you are finished typing that, press 
g% ENTER. The red light on your drive will go on and it will 
H start running. After the light on the drive goes out, your 
^ disk is formatted. Now type in D I R . The contents of your 
© disk will appear. Since there are no programs SAV Ed to 
^ your disk right after you format it, the screen will show 
g nothing. But, for example, let's say there are some pro- 
Hi grams on that disk. This is what your screen would 
" show: 
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OK 
DIR 
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MAIL LIST BIN 2 7 

ZAP BAS 4 2 

WSSGAME BAS 3 5 5 

SAMS GAME BIN 3 3 
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You might be wondering what the BIN and BAS mean. 
Well, their meanings are simple. BAS means BASIC. 
When you want to LOAD a program that says BAS 
beside it, you simply type LOAD, quotes, the name of 
the program, and then ending quotes. When the red 
light on the disk drive goes off, and it says OK below 
where you typed LOAD, type RUN, and you will have 
your program. 

B I N means BINARY or machine language. If it says 
BIN next to the program that you want, type what you 
would type if it said BAS next to the program, but 
instead of typing LOAD, type LOADM. When the red 
light goes off and it says OK below the spot where you 
typed LOAD, type EXEC and you will have your pro- 
gram. EXEC is for EXECUTE. 

Now that you have learned how to LOAD programs, 
how about learning how to save them? Saving is simple. 
All you type is SAVE, quotes, your program's name, and 
then ending quotes. 
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SAVE "name of program" 
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^ The red light on your disk drive should go on, and when 

q it goes off, your program will be SAVEd on that disk. 

i=i Whenever you type D I R, the name of the program that 

& you saved will show up on the screen. By the way, DIR 

H stands for Dl Rectory. 

S In this chapter you have learned how to SAVE and 

© LOAD on both the cassette recorder and the disk drive. 

^ These commands deal with I/O (Input/Ouput) to exter- 

H nal devices. In the next chapter you will be learning how 

a to use PRINT and math statements. 
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HOW TO USE PRINT 
AND MATH STATEMENTS 

In this chapter you will be learning how to use PRINT 
statements first with words and then with math state- 
ments. PRINT statements are very easy to use; they are 
also the first and the most important statements in pro- 
gramming. When you are using the PRINT statement 
you must always have quotes after it if you are not using 
variables. (You will learn about variables in the next 
chapter.) Look at the sample below to get a view of what 
a PRINT statement looks like. 



When you are finished typing the program type 
RUN, and on your TV screen will show: 










\h 



% 



+ 



J 



^ 




^ 



<=3 



10 PRINT"HI MOM AND DAD" 

20 PRINT"HOW IS EVERYTHING GOING?" 

30 PRINT "EVERYTHING IS FINE OVER HERE, SON." 



HI MOM AND DAD 

HOW IS EVERYTHING GOING? 

EVERYTHING IS FINE OVER HERE, SON. 



^ 
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t=> 






10CLS 

20 ? "WHAT MONSTER WOULD YOU LIKE TO BE?" 

30 PRINT 

40?"1. DRAGON" 

50? "2. OGRE" 

60? "3. WEREWOLF" 

70 PRINT 

80 ? "YOU GUYS SCARE ME!" 



The numbers 1 0, 20, and 30 stand for the line num- 
bers. Every time you want to write a program, you must 
type line numbers. Line numbers are numbers from to 
the total number of lines in your program. Usually you 
start a program with line number 1 and number the rest 
of the program by 1 0s. That's because you might want to 
add some more statements between the lines. For 
example, if you number your lines 1,2,3 and you want 
to add something between lines 1 and 2, you would 
have to start your program all over. But if you number 
your program 1 0, 20, 30, as we did above, you could put 
line 15 between lines 10 and 20 if you wanted. 

Enough with line numbers, let's get back to PRINT 
statements. A short way to do PR INT is to type the ques- 
tion mark. Type the program we just showed you but 
type a question mark instead of PRINT. When you type 
RUN <ENTER>, the question mark <?> should do the 
same thing as PRINT. 

To get used to using the PRINT statement, type in 
the next program. We will use the question mark this 
time. Also, we will introduce a new statement, CLS. This 
will clear the screen for you. We also put in PRINT 
without PRINTing anything. When RUN, this will put a 
space in between lines for you. 
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WHAT MONSTER WOULD YOU LIKE TO BE? 



When you RUN the program, it will look like this: 



1. DRAGON 

2. OGRE 

3. WEREWOLF 

YOU GUYS SCARE ME! 
OK 






1=3 



t=> 



t=3 



1=3 









10CLS 

20 PRINT"WHAT MONSTER WOULD YOU 

LIKE TO BE?" 
30 PRINT 

40 PRINT "1. DRAGON" 
50 PRINT "2. OGRE" 
60 PRINT "3. WEREWOLF" 
70 PRINT 
80 PRINT "YOU GUYS SCARE ME!" 



Before we go on, we will learn another new state- 
ment, LIST. After RUNning your program, type in the 
word LIST. Your program will then be LISTed to the 
screen as soon as you press ENTER. (Remember to 
always press ENTER after an immediate command and 
after a program line. Words like RUN and LIST are 
immediate commands.) There's a surprise! Instead of 
questions marks, there will be P R I NT statements where 
you put the question marks. It will look like this on 
your screen: 



DJL SCMK1 ®JL 



djl ©(mnsfl 



mm ®jl scams] cqxjl ©gum ®jl sota ®jl ©coins] ®jl ©cmnsi ®jl ©causa <a 



mq m 



ids© m 



T© MHWQ T© IMG® TT© BSD©© T© IM©§ T© DSHD)© TT@ QMS TT© QSHIDS TT@ IMES 



For practice, try saving the program to tape or disk. 
We will call the program MONSTER. 
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CASSETTE 

CSAVE "MONSTER" <ENTER> 



Now that you have learned how to PRINT letters, 
how about learning how to do arithmetic? Arithmetic is 
simple. It is just adding, subtracting, multiplying, and 
dividing. (It is much more than that, but that's all we're 
going to show you in this book.) First let's start with add- 
ing. Adding is the first thing a kid should know in arith- 
metic. Look at the example below to see how to do an 
adding statement. 



DISK 

SAVE "MONSTER" <ENTER> 



C=3 
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this: 



When you press ENTER, your screen will look like 



The PRINT statement tells the computer to PRINT 
the sum of 2+3 to the screen. If you put quotes around 
the 2+3, the computer would not PRINT the answer, 
but instead it would look like this: 



PRINT 2+3 



^ 



OK 

PRINT 2+3 

5 

OK 
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1=3 



OK 

PRINT "2+3" 

2+3 

OK 



So remember if you put quotes around something 
the computer will PRINT whatever is inside the quotes, 
but if there are no quotes around numbers, the com- 
puter will PRINT the numbers or their arithmetic results. 

Another thing a kid should know is how to subtract. 
Subtracting on your computer is just like adding except 
you type a minus sign instead of a plus sign. For instance, 
look at the sample to see what a subtracting problem 
might look like. 



t=> 



OK 

PRINT 23-18 

5 

OK 
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§=> 



That was easy, but don't use your computer to get 
the answers to your homework! You will never learn 
how to do it in your head or when you do not have your 
computer with you. 

Multiplying works the same way as addition and sub- 
traction. Try typing this on your screen. 



1 OK 

^ PRINT 6*7 

9 42 

t OK 
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When you want to multiply with your computer, use 
a little star called an asterisk for the multiplication sign. 
You wouldn't use the X because to the computer it just 
means the letter X. Division is the same as all the others 
except it uses the slash mark that looks like this /. You 
might type this to figure a division problem. 






C=3 



OK 

PRINT 4/2 

2 

OK 



C=3 
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For some division problems with fractions, your 
computer will print up to eight decimal points. When 
you get to junior high or high school, you will need all 
those decimal points. The next program gives examples 
of all the different math functions. 
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10CLS 

20 PRINT "ADD PROBLEM: 28 + 49" 

30 PRINT "THE ANSWER IS "; 28+49 

40 PRINT 

50 PRINT "SUBTRACT PROBLEM: 83 - 49" 

60 PRINT "THE ANSWER IS "; 83-49 

70 PRINT 

80 PRINT "MULTIPLY PROBLEM: 19 * 51" 

90 PRINT "THE ANSWER IS "; 1 9*51 

100 PRINT 

110 PRINT "DIVISION PROBLEM: 73/14" 

1 20 PRINT "THE ANSWER IS "; 73/1 4 

130 END 
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Notice that we were able to P R I NT both the message 
THE ANSWER IS and the math problem on the same 
line. The single PRINT statement took care of printing 
both. We used the semicolon (;) to put the two together 
on a single line. 

In this chapter you learned how to PRINT state- 
ments, and do adding, subtracting, multiplying and 
dividing. You also learned how to clear the screen with 
CLR, LIST a program, and use line numbers. In the next 
chapter you will learn how to use variables. 
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HOW TO USE VARIABLES 

NUMERIC VARIABLES 

In this chapter, we will show you the two kinds of 
variables. The first one is called a NUMERIC variable. A 
numeric variable is like a slot where you keep a number. 
You name the slot with one or two letters and the name 
works just like a number. You can change the number in 
the slot and the letters that represent the slot will now 
hold the new number. Look at the example to see what a 
numeric variable program might look like. 



When you are done typing that, type RUN and 
below where you typed the program the screen should 
show 65 (25 + 40 equals 65). The B in line 20 stands for 
25. That's why it says B=25. On the next line it says 
C=40; so in the computer's memory that means the 
variable C stands for 40. The line below that, line 40, 
means that the computer is to add B and C. It's the same 
as saying add 25 and 40, which is why 65 was printed 
below the program. 
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10CLS 

20 B=25 

30 C=40 

40 PRINT B + C 

RUN <ENTER> 
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10CLS 

20 A = 10 

30 A1 =A 

40 B = 20 

50B1 =B 

B0PRINT"A = ";A 

70 PRINT "A1 =";A1 

80 PRINT "B = ";B 

90PRINT"B1 =";B1 

100 PRINT"A1 TIMES B1 =";A1 * B1 

110END 

RUN <ENTER> 



A 

* B 
: 'A = 
'A1 



Numeric variables are fun and easy to use. Here are 
two more programs you can use to see how NUMERIC 
variables work. Notice how we PRINT both messages 
and numbers (variables) in the first program. If we use 
the semicolon (;), whatever we PRINT will be next to the 
first item we PRINTed. In the second program, before 
you R U N it, see if you can guess what the computer will 
PRINT to the screen. We also introduce a new state- 
ment, END. This tells the computer that it should stop. 
You do not need the E N D statement at the very end of a 
program, but in some cases we will look at later, you do 
need it. 
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10CLS 
20X = 50 
30Y = 60 
40 Z = 70 
50 A = X + Y 
B0 B = X + Z 



^> 



mm ©n Q(§sm ®jl ©cmnsfl ®jl scmnsi ®jl ©mm ®jl msm ®jl ©mm ®jl ©mm ®jl ©smsc ®jl ©mm ®jl ©mm 



MQ T® IMn)S TT© ffiDPS IF® 0»S TO IOT© IT® KQIE© TOD) D»S TT® Q»S m 



mm m 



Write some other programs of your own that use 
numeric variables. 
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70 C = Y + Z 
80 PRINT A 
90 PRINT B 
100 PRINT C 
110END 
RUN <ENTER> 
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STRING VARIABLES 

The other kind of variable we are going to show you 
in this chapter is called a STRING variable. A string vari- 
able is like a numeric variable except it has a dollar sign 
on the end of it. String variables store "strings" in slots 
just as numeric variables store numbers. A string is any 
message you put in quotation marks. For example, if 
you say, A$ = "I'M A COMPUTER STAR", the message 
would be stored in the slot called AS. When you PRINT 
A$ your computer prints 
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AS = "I'M A COMPUTER STAR' 
PRINT A$ <ENTER> 
I'M A COMPUTER STAR 



<ENTER> 






All string variables do is take something really big 
and change it into something small and easy to print. 
Look at the sample to see what a string variable might 
look like. 
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When you store your name in the slot called A$ in 
line 20, it will PRINTyourname when you PRINT A$ in 
line 30. We added H I and a semicolon so that your com- 
puter would greet you. You can mix string and numeric 
variables in the same program if you like. Look at the 
next program. 



t> 



10CLS 

20 A$ = "<YOUR NAME>" 

30 PRINT "HI ";A$ 

40 END 

RUN <ENTER> 
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10CLS 

20AG = <YOUR AGE> 

30 N$ = "<YOUR NAME>" 

40 PRINT N$; " IS ";AG; "YEARS OLD" 

50 END 

RUN <ENTER> 






INPUT STATEMENT 
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The next and the last thing we are going to show you 
is how to INPUT variables. That again is very simple. 
Instead of using a variable to equal something such as 



we enter the name of the string or the value of the 
numeric variable after we RUN the program. 






AS = "AIRPLANE" 



10 INPUT A$ 
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Look at the sample to see what a program with an 
INPUTted variable might look like. 



You saw another program similar to this one earlier, 
but by using the INPUT statement we were able to enter 
any name and age we want. INPUT can change the 
value of the variables when we RUN the program. The 
next program shows how we IN PUT and PRINTed two 
different strings for the same string variable. 



The first time we INPUT A$, it PRINTed the first 
word. The second time we INPUT A$, it printed the 
second word. This shows that you can change the con- 
tents of a variable while a program is being RUN. 
Change the program so that you can add two more 
words. To do that, just add some more lines to the pro- 
gram beginning with line 80. 
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10CLS 

20 PRINT "WHAT IS YOUR NAME?" 

30 INPUT N$ 

40 PRINT "HOW OLD ARE YOU?" 

50 INPUT AG 

60 PRINT"HI"; N$ 

70 PRINT "YOU ARE " ;AG; " YEARS OLD" 

80 END 



t=3 



10CLS 

20 PRINT"ENTER WORD NUMBER ONE" 

30 INPUT A$ 

40 PRINT AS 

50 PRINT"ENTER WORD NUMBER TWO' 

60 INPUT A$ 

70 PRINT A$ 
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g You can now see how important variables are. They 

q are very useful and very helpful. Well, guess what? This 

i=i is the end of the chapter. You have learned how to use 

g> both kinds of variables — numeric and string variables. 

H You have also learned how to INPUT variables. In the 

^ next chapter you will be learning how to use different 

© kinds of loops such as the GOTO statement and the 

& FOR/NEXT loop. 
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USING LOOPS 

There are two kinds of loops we will be showing you 
in this chapter. They are called the FOR/NEXT loop, 
and the GOTO loop. First, we will show you how to use a 
FOR/NEXT loop. Look at the example to see what a 
FOR/NEXT loop looks like. When you are finished 
looking at it, type it on your computer and R U N it to see 
what happens. 



In the second line, line 20, you will find that it says 
FOR X=1 TO 1 0. That means that X equals 1 to 1 0. 
The letter X is a type of variable. The value of X begins at 
1 and goes up to 1 0. Each time the program hits the 
NEXT statement, it loops back to line 20 increasing the 
value of X by 1 . That is why it is called a loop. The pro- 
gram does this until the value of X is equal to 1 and 
then it leaves the loop and goes to the line after the state- 
ment NEXT. On line 30 the program says to PRINT X. 
So the computer is going to PRINT the value of X. The 
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10CLS 

20 FOR X=1 TO 10 

30 PRINT X 

40 NEXT X 

50 END 
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first time through the loop, the value is 1, and then 2, 
then 3 and so on until it reaches 1 0. That's why it P R I NTs 
1 - 1 to the screen. If the loop began with FO R X = 40 
TO 50 it would PRINT40.41.42, etc. until it reached 
50. A good use for FOR/NEXT loops is when you have 
to do the same thing several times. If you have 1 names 
to enter you could write a program that uses a loop from 
1 to 10. Look at the next example. 



If you did not have the FOR/N EXT loop, you would 
have had to do it the hard way. Look at the example of 
the hard way. 



c=3 



C3 



^ 



10CLS 

20 FORX = 1 TO 10 

30 PRINT "NAME ";X; 

40 INPUT N$ 

50 NEXTX 

60 END 






^ 




10CLS 

20 REM THIS IS THE HARD WAY 

30PRINT"NAME 1 

40 INPUT N$ 

50 PRINT "NAME 2 

60 INPUT N$ 

70 PRINT "NAME 3 

80 INPUT N$ 

90PRINT"NAME4 

100 INPUT N$ 

110 PRINT "NAME 5 

120 INPUT N$ 

130 PRINT "NAME 6 
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140 INPUT N$ 

150 PRINT "NAME 7"; 

160 INPUT N$ 

170 PRINT "NAME 8"; 

180 INPUT N$ 

190 PRINT "NAME 9"; 

200 INPUT N$ 

210PRINT"NAME10 

220 INPUT N$ 

230 END 
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FORX = 1 TO 100 STEP 2 



10CLS 

20 FOR X = 1 TO 1 00 STEP 2 

30 PRINT X 

40 NEXT X 

50 END 



Using the FOR/NEXT loop it took only six lines to 
write the program. Using the old way took 22 lines. (We 
didn't count the REM statement line. All a REM does is 
to let you put a comment into a program. It doesn't affect 
the program at all.) 

You can also change the value in a FO R/N EXT loop 
with something other than one. Your computer can count 
by two's, three's or any other number you choose. To do 
this you have to use the STEP statement. It looks like 
this: 



Instead of counting from 1 to 1 00 by one's, it does it 
by two's. Enter the next program to see what happens 
when you use STEP. 
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Try changing the STE P value to see what happens. If 
you want to count backwards, use STE P and a minus (-). 
For instance, you could have 
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FORX = 100 TO 1 STEP-1 



10CLS 

20 FOR X = 1 00 TO 1 STEP -1 

30 PRINT X, 

40 NEXT X 

50 END 



Here's a program that will count from 10(3 to 1. 



E=" 






1=3 



10A$="FLOWER" 
20 B$="BED" 
30 PRINT A$;B$ 
40 GOTO 10 



Play with the statements to see what you get. The 
comma (,) in line 30 will print the numbers in two 
columns. Try changing the comma to a semicolon (;) 
and a blank (PRINT X) to see the different results on 
your screen. Now that you know how to use FOR/ 
NEXT loops, let's see how well you can do with the 
GOTO statement. Look at the next program to see what 
GOTO might look like in a program. 
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On lines 10, 20 and 30 you see string variables that 
you learned about in the last chapter. Well, what the pro- 
gram says is that A$ = FLOWER and that B$, another 
string variable, = BED. On line 30 it says to PRINT A$ 
and B$, so on your screen it would print FLOWERBED 
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1171 RFM ***************************** 

20 REM TELEVISION COMMERCIAL 
30 RFM ***************************** 

40CLS 

50 PRINT "SEE THE GREAT MOVIE" 

60 PRINT "THE CAT THAT ATE MIAMI" 

70 PRINT 

80 FOR W= 1 TO 1000 

90 NEXT W 

100 GOTO 50 



once. On line 40 the program says GOTO 1 so what 
the computer is going to do is go back to 10 and do the 
program all over again. Your screen will fill up with 
FLOWERBED. The computer will keep on doing that 
until you press BREAK, SHIFT @, turn it off, or until it 
breaks down. This is an example of an endless loop. 
Endless loops are not used very much since you want 
your program to end some time. Later on we will see a 
better use for the GOTO statement when we look at 
branching and decision making. But since we are talking 
about endless loops, the next program shows how to 
make a TV commercial with an endless loop. 



M 
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We used both a GOTO loop and a FOR/N EXT loop. 
The FOR/NEXT loop in lines 80 and 90 stopped the 
program for a couple of moments. The GOTO loop went 
back to line 50 and PRINTed the commercial message 
all over again. Try making your own commercial. For 
practice, try these next three programs. 
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10FORX=1 TO 1000 

20 PRINT X 

30 NEXT X 

40 FOR V=1 TO 100 

50 PRINT V, 

60 NEXT V 

70 PRINT"IF YOU CAN SAY ALL THOSE NUMBERS IN 

ONE MINUTE YOU SHOULD BE ON THAT'S 

INCREDIBLE!" 



^ 



^ 



ta 



1 PRINT "WHAT IS YOUR NAME?" 
20 INPUT A$ 
30 PRINT AS 
40 GOTO 30 



C=3 



In this chapter you have learned how to use two 
kinds of loops called FOR/NEXT loops and GOTO 
loops. In the next chapter you will learn how to use 
branching and subroutines. We will see more of the 
GOTO statement there. 



10 FOR 1=1 TO 50 
20 PRINT I 
30 NEXT I 
40 GOTO 10 
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DECISION MAKING 

In this chapter we will explain and use the I F/TH E N 
statement. It will enable you to do complex branching 
around your BASIC programs. There are two different 
types of branches or jumps, the GOTOs and the GOSU Bs. 
These are direct branches. You now ask what the heck is 
the IF/THEN statement. Type in the following program 
and let's see. 



Lines 40 and 50 used IF/THEN statements. The 
statements looked to see if the value of N was equal to 1 
or 2. IF the value of N was 1 THEN the program 
branched to line 1 0(3. 1 F the value of N was 2 TH E N the 
program branched to line 200. Notice that we used two 
END statements. If you did not enter a 1 or a 2 then 
there was no branch and instead the program just EN Ded 
at line 60. We also put an END statement in line 110 so 
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10CLS 

20 PRINT "ENTER 1 OR 2"; 

30 INPUT N 

40 IF N = 1 THEN GOTO 100 

50 IF N = 2 THEN GOTO 200 

60 END 

100 PRINT "YOU ENTERED ONE" 

110END 

200 PRINT "YOU ENTERED TWO" 
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that if you entered 1 , the program would not continue to 
200 and PRINT the statement YOU ENTERED TWO. 
The next program is more complex, but it shows you 
the power you have using IF/THEN statements. It also 
introduces the use of multiple statements on a single 
line. To place multiple statements within a single line, we 
have to use the colon (:). It works just like putting in 
another line number, but you can save memory and 
time by using it instead of a new line. 



TT® D»© IT® GSflDS TT® MHWQ IF® IOT© TT® H»© IT© 



% 



^ 



10CLS 

20 PRINT "WOULD YOU LIKE ME TO TELL YOU A 

JOKE"; 
30 INPUT l$ 

40 IF l$ = "YES" THEN 100 
50 IF l$ = "NO"THEN 70 
60 GOTO 20 : REM *** GO ASK AGAIN *** 
70 PRINT : REM *** SKIP A LINE *** 
80PRINT"SORRYTOHEARIT, IT WAS A GOOD JOKE ' 
90 END 
100 PRINT "WHY DID THE FOOL DRIVER MAKE 

SEVEN PIT STOPS IN THE INDIANAPOLIS 500?" 
1 1 FOR A = 1 TO 1 500 : NEXT A : 

REM *** WAIT A FEW SECONDS *** 
120 PRINT : REM *** SKIP A LINE *** 
130 PRINT "TWO FOR GAS AND FIVE 

FOR DIRECTIONS!!!" 
140 END 
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In this program the computer asks you to INPUT 
whether or not you would like to see the joke. You 
answered by replying YES or NO. If your INPUT was 
YES, the computer then branched to line 100 because 
of the IF 1$ = "YES" THEN GOTO 100. Now, if you 
typed NO , the computer made the decision not to 
branch to 100 because your INPUT was not equal to 
Y ES. Therefore it saw in line 50 that the I N P UT was N 
and so branched to 70. Line 60 is just an error trap for 
any type of wrong INPUTs, so anything that was 
I N PUTted other than YES or NO would cause the com- 
puter to jump back to 20 and ask the question again. 

The next program is a simple game that will demon- 
strate some of the logical functions shown below. They 
are called relational. 



SYMBOL 


MEANING 


= 


EQUAL TO 


> 


GREATER THAN 


< 


LESS THAN 


<> 


NOT EQUAL TO 


>= 


GREATER THAN OR EQUAL TO 


<= 


LESS THAN OR EQUAL TO 



fca 



© All these functions can be used with the IF/THEN 

^ statement to form complex decision making. Type in the 

H following program and RUN it to see how they work. 

H Also, we introduce the R N D (random number generator) 

" function. This function generates random numbers as 

© explained below. 

m 
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10 REM*** 

20 REM *** HIGH LOW GAME *** 

30 REM *** 

40CLS 

50 PRINT"I AM THINKING OF A NUMBER 

BETWEEN AND 100" 
60 PRINT "YOU MUSTTRYTO GUESS MY NUMBER 

BY TYPING IN DIFFERENT NUMBERS" 
70PRINT"AND I WILL TELL YOU IF YOU ARE TOO 

HIGH OR TOO LOW OR IF YOU HAVE IT" 
80 RU = RND(100) 
90 PRINT : REM *** SKIP A LINE *** 
100 INPUT "ENTER GUESS"; G 
110 IF G = RUTHEN 180: REM *** CORRECT*** 
120 IF G > RU THEN GOSUB 160 
130 IF G < RU THEN GOSUB 170 
140 GOTO 90 

150 PRINT: REM *** SKIP A LINE *** 
1 60 PRINT "IT WAS TOO HIGH" : RETURN 
170 PRINT "IT WAS TOO LOW" : RETURN 
180 FOR A = 234 TO 245: SOUND A,1 : NEXT A 

: REM *** SOUND LOOP*** 
1 90 PRINT "*** YOU GOT IT ***" 
200 PRINT : REM *** SKIP A LINE *** 
210 PRINT "DO YOU WANT TO PLAY AGAIN" 
220 INPUT l$ 

230 IF |$ = "YES" OR IS = "Y" THEN 80 
240 IF l$ = "NO" OR l$= "N" THEN 260 
250 PRINT "WHAT": GOTO 210 
260 PRINT 

270 PRINT "OK, GOODBYE" 
280 END 






"=3 



« 



^ 



^ 



<£ 



^ 



<=3 



m 



DJL SdnSfl ®JL ©(ffllGfl ®JL OTISfl ®JL ©GUM ®JL m!M ®JL ©SHISQ ®JL ©QMS! ®JL ©SMI ®JL S(M 



djl ©sir 



DJL ©ST 



,©s tt® mms T® Dsnm)S T® b&dids it® gs^s T® sops t® dsdi©© it® isniDS t® can®© ir® iko©© tt® osnm)© to 

gj In this game you are asked to pick a number from 1 

@ to 100. The computer will tell you if your guess is too 

^ high or too low and, also, if your guess was correct. In 

H line 80 the variable R U is the random number from 1 to 

H 1 00. It uses a new function called R N D. To get a range of 

^ random numbers, enter the highest random number 

© you want generated in parentheses after RND. For 

^ example, if you wanted random numbers from 1 to 55, 

& 

c=3 



RND(55) 



o 



you would enter 



^ The random numbers generated can be stored in 

© variables, such as we did with RU. Line 110 checks to 

H see if the number you entered was equal to the com- 

" puter's random number R U; if not, the program will con- 

© tinue to line 120 where, if the number INPUTted is 

s=3 greater than ( > ) the random number R U, the program 

H will do a different branch called a GOSUB. When the 

jg computer is at line 160 it will do the following: 1) it will 

print out it was to high, 2) it will see that there is a 

g RETURN, and the computer will go back to where the 

m GOSUB left off, at line 130. (Now wasn't that SIMPLE?!) 

g) Even if we found that our number was greater than the 

§f random number, we still have to check to see if it is less 

q than RU because the RETURN branched back to line 

t=> 130, right after the last GOSUB. You might be able to 

m figure out what's happening in 130. It's almost the same 

H thing as in 120, except if your number was less than RU 

^ the GOSUB would branch to 170. Again, after printing 

© out the message, the R ETU R N will go back to where the 

^ last GOSUB left off, line 140. Line 180 is a SOUND loop 
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that will be explained in a later chapter. Here it serves as 
a congratulations for you if your guess is correct. Line 
180 is where the computer branches if your guess is 
correct in line 1 1 0. In line 220 you're asked if you would 
like to play again, to which you reply either YES or NO, 
but did you notice that in 230 the computer checks to 
see if you I NPUTted YES or Y. That's where the OR 
logical operator comes in. This logical operator will let 
you compare two or more acceptable answers you wish 
to have. It's the same in 240 except it checks for NO 
'0 R' N. If none of the answers were acceptable, line 250 
tells you that your answer was bad and branches back to 
210. Of course we always have to say "Goodbye" 
when people don't want to play any more. That's lines 
260-280. 

There still might be some questions about the 
GOSUB/RETURN statements. If so type the following 
and RUN it. 



* * 
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IMPORTANT * * * 
The following program must be spaced evenly. In the 
PRINT statements there are periods in place of spaces. 
This is for the convenience of not having to count the 
spaces in the line. Example line 30 has three periods 
(...). When typing in the line you should insert three 
spaces and then the message. 
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* * * EXAMPLE * * * 

(THE BOOK) 

30 PRINT "... THE TRS-80 COLOR COMPUTER" 

(YOU TYPE) 

30 PRINT " THE TRS-80 COLOR COMPUTER" 



& 



10CLS 

20 GOSUB 200 : REM *** GO AND PRINT 

OUT 32 STARS*** 
30 PRINT "... THE TRS-80 COLOR COMPUTER" 
40 GOSUB 200 

50 PRINT" THIS ISA DEMO OF THE" 

60 GOSUB 200 

70 PRINT " GOSUB/RETURN STATEMENT" 

80 GOSUB 200 

90 PRINT 

100 PRINT 

110 GOSUB 200 

120 PRINT". THE COLOR COMPUTER IS THE BEST" 

130 GOSUB 200 

140 PRINT 

150 PRINT" <> <>THEEND< > < >" 

160 GOTO 160: REM *** INFINITE LOOP *** 

170 REM*** 

180 REM *** SUBROUTINE FOR PRINTING 

OUT 32 STARS*** 
190 REM *** 



Now, remembering the periods are to be replaced by 
spaces, type in the following program. 



\ 



®jl ©ansa ®jl mm ®jl <§(mm ®jl ©«q ®jl mm ®jl ©sued ®jl ©snnso ®jl otiso <m sgiim ®jl ©ansa ®jl ©cmn^i ® 

62 



0»g 



mws> T® osnp© T® bsdies T® osmss t® Dsn©© T® nsnros 



i[©s ire 



am)© m 



Now let's discuss the flow of the program. In line 20 
we GOSUB to line 2(90. Line 200 PR I NTs our 32 stars, 
then it goes down to 240 and branches back to where 
the last GOSU B left off in line 30. The program will con- 
tinue branching back and forth to the subroutine until it 
gets to line 1 60 and ends. Did you notice that instead of 
typing in several rows of stars, you had to do it just once 
by using the GOSUB/RETURN routine? The most 
important thing about this is we saved a great deal of typ- 
ing and a bunch of valuable memory. 

We finally made it. We're at the end of this chapter. 
Here are a few important things to remember. With the 
IF/THEN statements you can do complex testing of 
either numeric or string variables. Also GOSUB/ 
RETURN statements are always good to use if a certain 
routine will be used more than once or twice. 



200 PRINT "********************************" . 

210 REM*** 

220 REM *** BRANCH BACK TO WHERE THE LAST 

'GOSUB' LEFT OFF*** 
230 REM*** 
240 RETURN 
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ARRAYS and READ/DATA 

In this chapter we will discuss DIMs, ARRAYs, 
INPUTting ARRAYs and how to use READ/DATA 
statements. The best way to think about AR R AYs would 
be to think of them as a kind of variable. To understand 
the use of an AR R AY, type in the next program. (Remem- 
ber to clear your memory with the NEW statement.) 
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NEW<ENTER> 

10CLS 

20 PRINT "ENTER FIVE NAMES." 

30 INPUT A$ 

40 INPUT B$ 

50 INPUT C$ 

60 INPUT D$ 

70 INPUT E$ 

80CLS 

90 REM *** 

100 REM*** PRINT OUT THE NAMES*** 

110 REM *** 

120 PRINT "HIT 'ENTER' TO SEE LIST OF NAMES.' 

130INPUTAAS 

140 PRINT AS 
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150 PRINT B$ 
160 PRINT C$ 
170 PRINT D$ 
180 PRINT E$ 
190 END 

The program should be easy to understand, but it's 
not too good to use. If we have no more than one or two 
names or other types of data to be INPUTted, this 
method would be fine. How about trying to I N P UT 1 or 
15 names? Wouldn't that be a lot of IN PUT statements? 
This is where ARRAYs can help us. Let's try the follow- 
ing program: 

NEW<ENTER> 

10CLS 

20 PRINT "ENTER FIVE NAMES" 

30 PRINT : REM *** SKIP A LINE *** 

40 REM *** 

50 REM *** INPUT 5 NAMES *** 

60 REM *** 

70 FOR A = 1 TO 5 : REM *** SET LOOP *** 

80 PRINT"ENTER NAME #" ; A 

90 INPUT NAME$(A] 

100 NEXT A 

110 PRINT "HIT 'ENTER' TO SEE NAMES" 

120 INPUT ET$ 

130 PRINT : REM *** SKIP A LINE *** 

140 REM *** PRINT OUT NAMES *** 

150 FOR A = 1 TO 5 

160 PRINT "NAME #" ; A ; "=" ; NAME$(A] 

170 NEXT A 

180 END 

@ji smm ®ji s«n ®ji scmnsi ®jl ©mo ®jl ssnnso ®jl ®mosi ®jl ©amsc ®jl scninsQ ®jl ©nnrai ®jl ©hum ®h ©snns 



TO Dams -TO MBS T® MBS WD) MBS IT© KEIBS Tffi MBS WD) MBS TO MBS TO MBS IT© MBS TW 



s@ I&® /a g 1 m 5> 



fc. 



/WJ Ml/lffi KB 







^ 



^ 





^ 



^ 



^ 



^ 



1=3 



C=3 



^ 



mar ©jl ©gnnsn cm, otisi crm sonnsi ®jl otisd @jl scmnn ®jl ©onion cm, ©sinso ©jl 



ml ©cmon cm, ©coins 



(D)JL ©cm? 
67 



^ 



<0§)S> ir® Dsnros ir® Dsnros T® b»© ir® o»s to rass to Dsmns© t® Dsni©s t® mops tt® bsde© to imie© to ea 



^ 



e=> 



1=3 









t=3 



OK, now you might see the purpose of an array. If 
not, read carefully. In line 1 we set up the loop from 1 to 
5. In 40 we ask for an INPUT for the string variable 
N AM E$( A). At this point in the program A=1 , so you're 
I N PUTting NAM E$(1 ]. We will continue doing so until 
the loop is done (A=5). In line 90 we'll set up the loop 
from 1 to 5 again. Line 100 will PRINT what number 
we' re on and then PRINT out N AM E$(1), and continue 
until it gets to A=5 or NAME$(5]. 

Let's say that you want to add more than just five 
names. You would adjust the loops to a higher number. 
EXAMPLE: FOR A = 1 TO 5 change to FOR A = 1 TO 
20. Go ahead and change line 20 to: 



20 FOR A = 1 TO 20 



t=3 






DIM NAME$(15) 



RUN IT!!! 

You should have run into a problem (BS ERROR). 
The computer defines this as a BAD SUBSCRIPT 
ERROR. When using strings or variables greater than 
11, you must DIM (DIMension) that particular string or 
variable. The usual way to D I M an AR R AY is to D I M it 
to the highest number of times we want to use the 
ARRAY. For example, to DIM the array NAMES to 15 
we would enter 



fa 

m 



% 
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This is because we will be using the string NAMES ® 

15 different times, and the computer must make room jgj 

for the ARRAY data. Remember that DIM reserves a ^ 

certain amount of memory when you specify how much H 

you need by DIMension. © 



Let's fix the problem. Try this; insert the following 
line: 



^ 



15 DIM NAME$[15] @ 

<=1 



You should have no trouble getting to the 15th 
INPUT. " " # 

What you have now is 1 5 variable names, N A M E$ [ 1 ) || 

to NAM E$(1 5). Look at the list below which compares © 

regular string variables with array variables. We used an ^ 

array of four in the example, but you can get the idea of _ 

how much easier it is to use arrays in certain applications 
instead of variables. 



t=3 



Regular Array 



A$ 


A$(1] 


B$ 


A${2] 


C$ 


A$[3] 


D$ 


A$[4) 



E3 



^ 



With arrays we can generate the variable names M 

using FOR/NEXT loops as we did in our example pro- ,_, 

gram. It saves a lot of time keying in variable names and ~ 
makes our programs more flexible. 



o) 
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fa 
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It's time we learn two more BASIC statements. These 
next statements are the READ/DATA statements. Type 
in the following program and RUN it. 



%. 



^ 



The program first sets the loop from 1 to 5 in line 20. 
Then in 30 it R EADs the DATA from line 60 and stores it 
in D$. You must always separate each piece of DATA by 
a comma (,). This tells the computer where a new piece 
of data starts and ends. The first time through the loop 
the variable D$ reads MONSTERS, then GOBLINS 
and finally VAMPIRES. After the program is RUN, the 
values of D$ are as follows: 



10CLS 

20 FOR A = 1 TO 5 

30 READ D$ : REM *** GET DATA *** 

40 PRINT D$ 

50 NEXT A 

60 DATA MONSTERS, GOBLINS, WITCHES, 

GHOSTS, VAMPIRES 
70 END 



«=3 
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D$ = MONSTERS WHEN A =1 
D$ = GOBLIN WHEN A =2 
D$ = WITC H ES WHEN A =3 
D$ = GHOSTS WHEN A =4 
D$ = VAMPIRES WHEN A =5 

In the next program we're going to tinker with tran- 
ferring data from DATA statements into string ARRAYs. 
This type of program would be useful when making a 
telephone-address file. 



^ 
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10CLS 

20 C=1 : REM ***SET ARRAY POINTER TO ONE *** 

30 READ B$ : REM *** GET DATA *** 

40 IF B$ = "END" THEN GOTO 80 

50 D$(C) = B$ 

B0 C=C+1 : REM *** INCREASE COUNTER 

OF ARRAY*** 
70 GOTO 30 

80 PRINT : PRINT "HIT 'ENTER' TO SEE NAMES" 
90 INPUT ET$ 
100 REM*** 

1 1 REM *** PRINT OUT NAMES *** 
120 REM*** 
130FORA = 1 TO C-1 
140 PRINT "DATA #" ; A ; "=" ; D$[A] 
150 NEXT A 
160 END 
170 REM*** 

1 80 REM *** PLAC E YOUR INFORMATION BELOW *** 
190 REM*** 

200 DATA DOG, CAT, COW, HORSE, PIG, GOAT, SHEEP, 
END 

Notice we used the variable A in our FOR/NEXT 
loop in line 1 30 instead of C. It doesn't matter what vari- 
able names we used since all we want it to do is to 
generate the numbers 1 to 7. That's because our array 
variables are actually D$(1 ) to D$(7) and not D$(C] or 
D$(A). The C and the A just represent different num- 
bers. Also, note how we used E N D as the last element in 
our DATA statement. When the computer READ "END", 
it stopped READing DATA into the array and jumped to 
the routine for PRINTing the array to the screen. 

®jl mm ®jl <mm m. ©snnsn ®n scnmsn owl ^mm <m. ©sddsq ®jl scnmsD ®jl scmnsi ®jl scamsc ®jl ©ansa ®jl ©cnmsn ®ji 
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Since you've had so much experience with the ® 

D ATA/R EA D statements, why not make that telephone- p| 
address file for yourself. (It's easy to do, but since your 

friends are probably something other than the barnyard S 

characters we know, try putting names, addresses and § 

telephone numbers in your DATA statements. Use ^ 

separate arrays to READ the different parts of a name / © 

address / telephone list.) « 

GOOD LUCK. | 

i 
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MAKING SOUND 

In the last chapter we saw how to use the DATA/ 
READ statements and how useful they are. In this chap- 
ter we're going to experiment with DATA/READ and 
SOUND statements. There are two separate numbers 
that the SO U N D statement requires. The first is PITCH, 
and it can range from 1 to 255. The second is the length 
of the note or sometimes called DURATION, which also 
ranges from 1 to 255. Try some examples. Just key in 
the examples and hit <ENTER>. 



SOUND 1,255 



The lowest and the longest note the 
computer can play. 



SOUND 1 ,8 Same pitch, shorter duration. 



SOUND 255,1 Highest pitch, shortest duration. 



* * * 



NOTE 



The SOUND statement requires that both pitch and 
duration be from 1 to 255. If not you might get an ?FC 
ERROR. Go ahead and play around with sound for a 
few minutes and then type in the next program and 
RUN it. 










t=3 
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<3 



M 
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ta 



t=> 



£== 



c=a 



1== 



c=d 



E=" 
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10CLS 

20 D=8 : REM *** DURATION TIME IS 8 *** 

30 READ T : REM *** GET PITCH DATA *** 

40IFT = 0THEN 80 

50 SOUND T,D 

60 GOTO 30 

70 DATA 1 47, 1 59, 1 33, 5, 89, 

80 PRINT " CLOSE ENCOUNTERS OF 

THE COLOR COMPUTER KIND" 
90 RESTORE : REM *** RESET THE COMPUTER TO 

THE START OF PITCH DATA *** 
100 D = D - 1 : REM *** DECREASE DURATION *** 
110IFD = 0THEN 130 
120 GOTO 30 

130 PRINT: PRINT: REM *** SKIP TWO LINES*** 
140 PRINT" THEY'RE HERE !!!" 

150 REM *** 

160 REM *** TIMING LOOP *** 
170 REM *** 

180 FOR A = 1 TO 200: NEXT A 
190 REM*** 

200 REM *** SOUND FOR THEY'RE HERE !!!" 
210 REM*** 
220 SOUND 159,4 
230 SOUND 200,4 
240 SOUND 185,8 
250 END 



% 

B 



B 
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^ 



C=3 
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In the program above we start out setting the SOUND 
duration to 8, then it READs the first piece of DATA 
from line 70. Line 40 checks to see if the DATA was 0. 
Look at the last piece of DATA in 70, notice that it's a 0. 
This will tell the computer that we're done playing the 
song and will allow us to continue with other parts of the 
program. If line 40 finds that yes, the data was a then 
we will branch to 80 where it PR I NTs out the message. 
Then in 100 it decreases the variable D (duration) by 1. 
Line 110 checks to see if D is 0, if not, the program will 
play the song again until D is equal to 0. Every time the 
duration is decreased, the computer plays the song a lit- 
tle bit faster until D is 0. When the duration finally 
becomes we branch down to 130 and the program 
continues to 180. Here, there is a timing loop which 
takes about one second. It then plays THEY' RE HERE!!!. 
With this type of program you can generate almost any 
type of desirable musical number. 

The new statement we introduced in line 90, RE- 
STO R E, resets the pointers to the beginning of the DATA 
statements. It works with any kind of READ/DATA 
statements, not just SOUND. It is useful if you want to 
READ in the same DATA more than once in a program. 

The next program will help you generate a musical 
number. It will allow you to INSERT, EDIT, and PLAY 
MUSIC. Type in the following program and RUN it. 



^> 



10 E = 3 : REM *** NUMBER OF NOTES ON THE 

SCREEN AT ONCE*** 
20 DIM T[100], D[1 00] : REM *** RESERVE ROOM FOR 
T& D*** 
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30CLS 

40 PRINT 

50 PRINT " <1 > INSERT DATA" 

60 PRINT " <2> EDIT DATA" 

70 PRINT " <3> PLAY MUSIC" 

80 PRINT" <4> DISPLAY DATA" 

90 PRINT" <5> EXIT" 

100GOSUB140 

11 ON S GOTO 1 90, 51 0, 71 0, 81 ,930 

120 SOUND 236,8 

130 GOTO 30 

140 PRINT: PRINT; 

1 50 INPUT "ENTER SELECTION"; S 

160 RETURN 

170CLS:PRINT@0,"****WHENDONETYPE999****" 

: RETURN 
180FORT = 1 TO 100: IFT(T) =0THEN RETURN 

ELSE N EXT T 
190 REM*** 

200 REM *** INSERT DATA ROUTINE *** 
210 REM*** 
220 CLS 

230 PRINT " <1 > CONTINUE INSERTING DATA" 
240 PRINT" <2> ALL NEW DATA" 
250GOSUB 140 
260 ON S GOTO 280, 330 
270 GOTO 190 
280 CLS 
290 PRINT "AT WHICH NUMBER DO YOU WISH TO 

CONTINUE" 
300 INPUT C 



<=3 
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310GOSUB340 

320 GOTO 40 

330 C = 1 

340 CLS 
§ 350GOSUB170 

H 360 GOTO 380 

q 370 PRINT "error redue" : SOUND 245, 5 

fa 380 PRINT "data #"; C 

U 390 PRINT 

g 400 INPUT "PITCH"; T 

^ 410IFT=999THEN40 

© 420 INPUT "DURATION"; D 

^ 430 IF D = 999 THEN 40 

© 440 T[C) =T: D(C] = D 

§ 450IFT(C]< 1 ORT(C) > 255 OR D[C) < 1 

5 OR D[C] > 255 THEN 370 
460 C = C + 1 
470 IF E = C THEN GOSUB 1 70 ELSE 490 

^ 480 E = C + 3 

B 490 PRINT 

a 500 GOTO 380 

P 510 REM*** 

6 520 REM*** EDIT DATA ROUTINE*** 
Q 530 REM*** 

§ 540 CLS 

@ 550 PRINT "WHICH DATA LINE DO 

§=> YOU WISH TO EDIT." 

B3 560 PRINT 

| 570 INPUT"ENTER LINE NUMBER"; LN 

^ 580 IF LN > 100THEN510 

© 590 PRINT "data #"; LN 

t 3 600 PRINT "PITCH=" ; T[LN] 
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e=p 



610PRINT"DURATION="; D(LN] & 

RPI7J PRINT "********************************" . j 

630 PRINT "data #"; LN © 

640 INPUT "PITCH" ;T[LN] S 

650 INPUT "DURATION"; D(LN] i 

660 PRINT " © 

670 PRINT "DO YOU WANT TO EDIT ANY MORE" g 

680 PRINT y 

690 INPUT AS g 

700 IF A$ = "YES" OR A$ = "Y"THEN 510 ELSE 40 § 

710 REM*** ^ 

720 REM *** PLAY DATA ROUTINE *** g 
730 REM*** 

740GOSUB180 « 

750T = T-1 g 
760 IF T = THEN GOTO 40 
770 FOR P = 1 TOT 

780 SOUND T[P). D[P] ^ 

790 NEXT P m 

800 GOTO 30 63 

810 REM*** cj 

820 REM *** DISPLAY DATA ROUTINE*** © 

830 REM*** ^ 

840 CLS § 

850GOSUB180 B 

860T = T-1 g 

870 FOR P = 1 TO T © 

880 PRINT"DATA #" ; P ; "PITCH=" ; T(P] ; "DUR="; D[P] g 

890 NEXT P p 

900 PRINT B 

910 INPUT " HIT ENTER WHEN READY"; A$ |f 

920 GOTO 40 

930 END P 
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With this program we're going to describe how the 
program operates, not how it works. When you first 
RUN the program it gives you a main menu. Let's say 
you wanted to generate music. You would enter #1. It 
then gives you another menu, and you should type in 
#2. Now, all you have to do is enter in the pitch/ 
duration data. After each input you must hit 
<ENTER>. When you are finished, type in 999. This 
will send you back to the main menu. There you can 
either PLAY, DISPLAY NOTES, or EDIT DATA. When 
you're finished and have written down all of the PITCH 
and DURATION DATA, you can then put the DATA into 
a SOUND program. 

There is a new statement we put into the program 
that you should understand. Notice lines 180, 470, and 
700. There's something different about the IF/THEN 
statements. These are I F/TH EN/ELSE statements. The 
IF/THEN/ELSE statement evaluates the IF/THEN 
condition, and if that condition is not met, it branches to 
the ELSE condition. Using ELSE in an IF/THEN se- 
quence allows you to branch in two ways instead of one. 
The next little program shows you more clearly how it 
works. 



3 



^ 
^ 



10CLS 

20 PRINT "ENTER 1 OR 2" 

30 INPUT N 

40 IF N = 1 THEN GOTO 1 00 ELSE GOTO 200 

50 END 

100 PRINT "YOU PRINTED ONE" 

110END 

200 PRINT "YOU PRINTED TWO OR MORE" 



MJEQ ®JL S(fflE 
82 



djl ©(Siimi ®jl ©dnso ®jl ©cmnsn ®jl ©nrasi ©jl scnmsi ®jl samso ®jl ©nraso ®jl scamsi ®e wm 



to mum to nann© to msm to rass to nsn©© to oanss to mops to d»s to ikops to nsnrn>s 




*3 



^ 



^ 



^ 



c^ 



K9 



^ 



m ®jl ©(fflDso ®jl ©anna am. ©snnso ®jl ©cmnsfl ®jl ©(mnn ®jl ©cmnsn ®ji ©oto ®jl ©sdiisd ®jl scmnsn ®jl ©annsfl ®jl scm# 



^JiPS TO DSn®S TO DM© TO K0ffi)S TO KOffi)© TO DSDffi)S TO DSOPS TO DSDIDS TO BSD®© TO B»© TO DSHD© TO 1M 



The next program allows you to put in the notes for 
your own program. Get some music, enter the note 
values in the DATA statements, and play your own 
sound. 



I=" 



E=" 



10CLS 

20 REM *** PLACE YOUR TITLE *** 

HERE*** 

Qj7[ ppiWI ************************ 

40 READ T : REM *** GET PITCH *** 

50 IF T = 8 THEN GOTO 100 

60 READ D : REM *** GET DUR *** 

70SOUNDT, D 

80 GOTO 40 

90 DATA :REM *** PUT YOUR OWN DATA HERE *** 

100 REM" * * * THE END* * *" 

110END 






6=" 



Well, that wraps up this chapter. Have fun making 
SOUNDs with your computer. 



%. 
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COCO GRAPHICS 

This is one of our favorite chapters because it tells 
how to create pictures on the screen. We will show you 
how to make figures and give you some graphics so you 
will be able to create a game or some fascinating pro- 
gram! First, we will show you some of the statements 
used for graphics. Look at the program below to see 
what a program with graphics looks like. When you are 
finished looking at it, type it in. 



Lines 10 and 40 set up a FOR/NEXT loop for H. In 
the SET statement, the first value is the horizontal posi- 
tion, the second the vertical position, and the third the 
color. In the program you see FOR H = 1 TO 45. This 
means that on the GRAPHICS SCREEN the computer 
will make a line from 1 all the way to 45 at vertical 
positions 3 (near the top) and 25 (near the bottom). 
What SET means is the computer "sets" a block on the 
screen where you tell it to. The loop first SETs a block at 
horizontal position 1, vertical position 3. Since the verti- 
cal position stays the same (3) and the value for H 







^ 



^ 



10 FOR H=1 TO 45 
20SET(H,3,3] 
30SET(H,25,3] 
40 NEXT H 
50 GOTO 50 



<5E§ 



=3 



<=§ 
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changes each time it goes through the loop, you get 
blocks lined up from horizontal position 1 to 45 all on 
vertical position 3. That's what the line really is — a line 
of blocks. The second line is made the same way except 
it is at vertical position 25. The color for the blocks is 
coded in the last number. In this case it is blue, or Code 

© 3. A list of all the color codes is given later. 

^ Line 50 says G OTO 50 so the program just sits there 

until you press BREAK. Leave line 5(9 out and see what 
happens. It should say K at the top of the screen, which 
means that there is nothing more to do. The program is 
over and the computer asks, "OK, now what do you 
want me to do?" Since the graphics screen and locations 
are different from the text screen, we ought to take a 
look at it. You can have up to 64 horizontal (across) 
blocks and 32 vertical (down) blocks. You SET (hori- 

|e* zontal, vertical, color) to place your block on the screen. 

Graphic Screen 

32 63 
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In the above figure, the X is at horizontal location 32 
and vertical location 16. 

So far in this chapter you have learned how to use 
some of the graphics commands, such as SET and the 
FO R/N EXT loop to make a line. Before learning how to 
work with color, we will show you how to make vertical 
lines. Vertical lines are simple since they are made in the 
same way as horizontal lines, except you stack the 
graphic blocks on top of one another instead of side by 
side. Look at the program below to see how to make a 
vertical line. When you are finished looking at it, type 
it in. 



to dsuds to mms> IT© 



^ 



rf 



C3 



^ 



10 FOR V=10TO 26 
20 SET(24,V,0) 
30SET(18,V,4] 
40 NEXT I 
50 GOTO 50 



■=§ 



Online 1(3 the program sets up a FOR/NEXT loop 
for V which means, you guessed it, Vertical. On line 20 it 
says SET(24,V,0]. The 24 means how far horizontally it 
goes, and the V stands for vertical. 

Right now it's about time you know how to use that 
third number in the SET statement. Well, it is the color of 
the blocks you are sending to your screen. In this case 
the blocks in line 20 are black. Look at the chart below to 
see all the colors your computer has. (What color vertical 
line will be made by line 20?) 






^ 
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E=> 



0=BLACK 

l^GREEN 

2= YELLOW 

3=BLUE 

4=RED 

5=BUFF 

6=CYAN 

7=MAGENTA 

8=ORANGE 

Notice that there is a total of nine colors. Those 
colors can do a lot of different things besides making a 
line in different colors each time. Look at the program 
below to see how to use different colors in your pro- 
grams. When you are finished looking at it, type it on 
your computer. 
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10CLS[0) : GOSUB 100 

20CLS(1): GOSUB 100 

30CLS[2): GOSUB 100 

40CLS(3): GOSUB 100 

50CLS(4]: GOSUB 100 

B0CLS(5] : GOSUB 100 

70CLS(6) : GOSUB 100 

B0CLS(7): GOSUB 100 

90 CLS(8) : GOSUB 1 00 : END 

100 FOR HOLD = 1 TO 500 : NEXT HOLD 

110 RETURN 
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la 



pa 



In the first chapter you learned that CLS means to 
clear the screen. When you place a number next to C LS 
in parentheses, it clears the screen to that color code. 
Run the program; it should have nine screens with a 
color from the program above. The FOR/NEXT loops, 
called HOLD, simply "hold" the screen color for a while 
so you can see it. If those loops were not in the program, 
it would clear the screens so fast you would be unable to 
see all the colors! 

Now that you know how to make lines and color, it is 
time for, as the circus would call it, the grand finale. We 
will give you a program that will create a figure. Look at 
the program below to see what the program looks like 
and the similarities in making vertical and horizontal 
lines. When you are finished looking at it, type it in. 



E=> 






10CLS(4] 

20 FOR H=18 TO 24 

30SET(H,3,3) 

40SET[H,7.3) 

50 NEXTH 

60 FOR V=2 TO 7 

70SET(21,V,3) : NEXTV 

80 FOR H=24TO 25 

90SET(H,2,3] 

100SET(H,3,3) 

110 NEXTH 

120 FOR V=2TO 3 

130SET(24,V,3) 

140SET(25,V,3) 

150 NEXTV 

160 GOTO 160 



mm ®jl ©snnsQ ®jl ©nmsQ ®jl ©ora ®jl ©cane 



sa «m Qmm ®JL SCffllG 



mm ®jl scans 



1®S T® 1MG)S T® KBPS T® DSEIOS 



IPS TO KOPS TT© DSOPS TT® Q»S TT® QMS IT® B»S TT® D»S 




ThaT'6 NOT houJ YOU CHMGt ScRZEN Q)LOR 



I 







m 
^ 



c=a 



d 



^ 



^ 






djl mm ®jl scmnsD ®jl ©«q ®jl scams ®jl ©mnsn ®jl mm ®jl otgs ®jl gcninsa ®jl scmnsi ®ji stmiisn ®jl 



t=) 



^ 



^Wffi)S T® QSJffi)S T® IKDffi)© TT® D&OIDS TT® IKIIffi)© T® DSD©© T® DSIIEDS TT® DSD©© T® MffiE)© TT® EMS TO) HDDS T® ISO 
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C=3 



When you have finished typing it, type RUN. If you 
typed the program correctly, it should give you a blue 
figure on a red background. Now that you know how to 
do a lot of things with graphics, try making up some of 
your own characters. 

In this book you are learning how to use graphics in 
many ways. When you grow up, maybe you can get a job 
making graphic programs. In the next chapter you will 
learn how to make a game. 
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HOW TO MAKE A GAME 

In this chapter we'll discuss how to put together a 
simple game. All of the programs and discussions will be 
based on COLOR BASIC not EXTENDED COLOR 
BASIC. In developing a game, a major objective should 
be the purpose or goal of the game — such as catching 
bombs or shooting down the green invaders. Your game 
shouldn't be so hard that people won't win, or they just 
might lose interest. Of course, it certainly should not be 
too easy, enabling them to play for hours on end and 
not lose. 

In the example programs, below, we will be using the 
JOYSTK function. The JOYSTK function works as 
follows: The computer says that from the TOP to the 
BOTTOM there are 64 different positions, from (9 through 
63. This is also the same for the SIDE to SIDE position. If 
the joystick is in the middle, the computer will say the 
value is 32. The way we get the value is by using the sim- 
ple statement X = JOYSTK(0], where X is the variable 
of the LEFT/RIGHT value of the joystick. Now we can 
get the UP/DOWN value part of the joystick by using 
Y = J0YSTK(1]. To see this, type in the program 
below: 






e=3 



^ 







t=§ 



^ 



^ 



<=1 



10CLS 

20 X = JOYSTK(0) : REM *** GET SIDE TO 
SIDE VALUE*** 



«§3f 
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H 30 Y = JOYSTK(1] : REM*** GET 

e UP /DOWN VALUE*** 

P 40 PRINT@ 96, "SIDE TO SIDE VALUE IS"; X 

gg 50 PRINT© 1 28, "UP / DOWN VALUE IS"; Y 

Q 60 GOTO 20 



t=i 



If you want to get an AUDIO effect to demonstrate 
the joystick, add the following lines: 



^ 



Note: when using the SOUND statement, the two 
values have to he from 1 to 255. They could not be 0. 
So, in line 40 we have to make sure that this require- 
ment is fulfilled and make certain that the lowest value 
is 1, not 0. 



40IFY = 0THEN Y 
50 SOUND Y,1 
60 GOTO 20 



1 : REM 



Y CANT BE 



& 



c=3 



60C = X 

70IFX>8THEN GOTO 20 
80 CLS(C) 
90 GOTO 20 



Let's really get fancy; add the following lines: 



c=5 



Remember that the highest we can CLS is to 8, 
nothing higher. 
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Notice that the screen changes colors when you 
move the joystick slightly from the left side. These exam- 
ples are to show you the basics behind the function. Use 
your imagination and come up with some other quick 
ideas. If you want to make the fire buttons work on your 
joysticks, type in the example. Use the right joystick. 



1 

m 

^ 



10CLS 

20 B = PEEK (65280) 

30 PRINT B 

40 GOTO 20 

50 END 



<=1 



There are two numbers that you should get, either 
126 or 254, when pressing the RIGHT joystick button. 
Now use the LEFT joystick and see the difference in the 
numbers; it should be 1 25 or 253. This is the way we can 
tell which button was pressed first. 

In the next program we'll show you how to draw with 
the joystick. When using this next program you can 
change the color of the graphic block by typing C and 
then typing in the desired color. The colors are from to 
8, using the same codes we saw in the last chapter. Here 
they are again so you can see what colors you're using. 



< > BLACK 
< 1 > GREEN 

< 2 > YELLOW 

< 3 > BLUE 

< 4 > RED 



< 5 > BUFF 

< 6 > CYAN 

< 7 > MAGENTA 

< 8 > ORANGE 



<3 



<=3 



<=p 
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You can also clear the screen by pressing the joystick 
button. To erase a mistake, use color 1, which is green. 
However, be careful. You can draw right off the screen if 
you don't watch what you're doing. 



10CLS 

20 CH = 128 : REM *** DRAWING COLOR. 

128=BLACK*** 
30 X = JOYSTK[0) 
40Y = JOYSTK(1] 
50 X = X/2 : REM *** CALCULATE WHERE TO PRINT 

ON THE SCREEN*** 
60 Y = INT{Y/4] : REM *** SAME AS ABOVE *** 
70 T = Y * 32 + X : REM *** SAME AS ABOVE *** 
80PRINT@T, CHR$(CH]; 
90 IF INKEY$= "C" THEN GOSUB 1 20 

: REM *** CHECK TO SEE IF YOU WANT TO 

CHANGE THE COLORS*** 
1 00 IF PEEK(65280] = 254 THEN CLS : REM *** SEE 

IF BUTTON IS BEING PRESSED *** 
1 10 GOTO 30 
120A$ = INKEY$ 
130 IF AS = "" THEN 120 
140V = VAL(A$] 
1 50 CH = 1 28 + 1 6 * [V-1 ) + 1 5 : REM *** CALCULATE 

WANTED COLOR*** 
160 IF CH>255 THEN CH=255 : REM *** ERROR 

TRAP AGAINST FC ERROR *** 
170 RETURN 



^ 



^ 







^ 



^ 



^ 
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We're going to end this chapter with a simple game 
called CAR RACE. The game is simple and straightfor- 
ward to use. When you first run the game, there is a 
timer, G. When G reaches 4(3(3 the game breaks out of 
the 'MOVE CAR' routine and calculates your score. See 
if you can figure out exactly what every routine does, 
then improve or write your own version. 



10CLS 

20 C = 271 : REM *** LOCATION OF YOUR 

CAR ON SCREEN *** 
30A$ = CHR$(128) 
40 PRINT @C,A$; 

50 GOSUB 270 : REM *** GO PRINT OTHER CARS *** 
60 PRINT @27, T; : REM *** PRINT HOW 

MANY TIMES HIT*** 
70 SOUND 145,1 
80 PRINT @ C-32, CHR$(143) ; : REM ERASE 

YOUR CAR *** 
90 X = JOYSTK(0] 
100 IF X < 20 OR X> 50 THEN GOSUB 150 

: REM *** DON'T MOVE IF THE JOYSTK IS 

IN THE MIDDLE*** 
110IF POINT(31+F,16) =0THEN GOSUB 320 

: REM *** CHECK TO SEE IF YOU HIT 

ANOTHER CAR*** 
1 20 G = G + 1 
1 30 IF G = 400 THEN 330 : REM *** IF G=400 THEN 

GO PRINT OUT THE SCORE*** 
1 40 GOTO 40 : REM *** GO READ JOYSTK *** 
150 IF X> 50 THEN 200 ELSE 210 



%. 
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170 REM*** 

180 REM *** KEEP YOUR CAR WITHIN THE 

BOUNDARIES*** 
190 REM*** 

200 C = C + 1 :F = F + 2: GOTO 220 
210C = C- 1 : F = F- 2 
220 IF F< -30 THEN F = -30 
230 IF F> 30 THEN F = 30 

240 IF C< 256 THEN C = 256 g 

250 IF C> 286 THEN C = 286 
260 RETURN 

270 REM*** © 

280REM*** ROUTINE FOR PRINTINGOTHER CARS*** ^ 

290 REM*** g 

300 Z = RND[30): PRINT @480+Z, © 

CHR$(RND[4)+5*32-1] <=3 

310 RETURN ® 

320 SOUND 245,10 :T = T + 1 : RETURN § 

330 FOR A = 1 TO 1 6 : SOUND RND(255],1 : NEXT A |j 

340 CLS 

350 PRINT "YOU WERE HIT" ; T ; "TIMES" 
360IFT = 0THENT = 2 : REM *** T=MUST ALWAYS « 

BE GREATER THAN 0, OR YOU'LL @ 

GET AN /0 ERROR*** § 

370 PRINT "YOUR SCORE WAS" ; INT(G*2/T] ; ^ 

380 PRINT "OUT OF 400" Q 

390 PRINT: PRINT ^ 

400 PRINT "DO YOU WANT TO PLAY AGAIN" ; || 

410 INPUT A$ B 

420 IF A$ = "YES" OR A$ = "Y" THEN RUN ^ 

430 PRINT "CHICKEN!!!" ^ 



440 END 



^ 
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Well, we used a lot of different commands to make 
the game, and some we used are advanced. However, to 
make a good game, we sometimes have to get a little 
advanced. By now, you have learned most of the state- 
ments in the program; if you study the program careful- 
ly, you can get an idea of how it works. With practice, you 
can make your own games. 
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HOW TO USE A PRINTER 

Printers are like computer typewriters, but they can 
do a lot more than a typewriter. There is a special set of 
printer commands to learn, which is what this whole 
chapter is all about. We are going to show you how to do 
some things, like how to make a LISTing of a program to 
your printer and how to print a sentence or two (or three 
or four or more!). 

First we are going to show you how to LIST a pro- 
gram to your printer. The command for that is LUST. 
Look at the program below to see how LLIST works. 
When you are finished looking at it, type it in. 



Now that you have finished the program, turn on 
your printer. Make sure it is ON LINE. If it is not ON 
LINE, flip the switch on your printer that will turn it ON 
LINE. (Some printers will have you choose SEL instead 
of ON LINE, but it's the same thing.) Now type 













I 
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10 PRINT"HI BILLY, HOW'S IT GOING?" 
20 PRINT'FINESAM, HOW'S ITGOING OVERTHERE?" 
30 PRINT "FINE, WELL I'LL SEE YOU TOMORROW" 
40 PRINT'OK, BYE" 



^ 






^ 



^ 
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The printer will print out the entire program includ- 
ing the line numbers and the statements. It will print 
everything that is in the program. All LLIST does is to 
LIST the program on the printer instead of on your TV 
screen. This may not seem too interesting, but when you 
are working on a long program trying to find bugs, it 
helps a lot to have a printer listing. It's called "hardcopy." 
Also, to send your friends a listing of your programs, the 
printed listing from your computer looks neat and you 
won't make mistakes in copying it. 

Now that you know how to print out a LISTing (or 
LLISTing) to your printer we are going to show you how 
to print sentences, words, or letters or any other text you 
want to your printer. (We won't discuss printing out 
graphics since that depends on the type of printer you 
have and is pretty advanced.) Look at the next program 
to see how to print text to your printer. 
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If it didn't work then look at your printer and make 
sure it is turned on and ON LINE. On your printer it 
should say, 



10D$ = "I OWN A DOG. HIS NAME IS MACHO." 
20 PRINT #-2, D$ 



^ 



I OWN A DOG. HIS NAME IS MACHO. 



^ 



The whole secret to PR I NTing to your printer instead of 
to your screen is in line 20. The statement PRINT #-2 
instead of P R I NT sends what would normally go to your 
screen to your printer. In this case D$ in line 1 is I W N 
A DOG. H IS NAM E IS MACHO, and that is what is sent 
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to the printer. Now that we have that out of the way, feel 
free to change line 1 to whatever you want it to be. You 
can make a sentence or a paragraph or two. 

Right now we will show you how to print lower case 
letters. Lower case letters are simple; look at the exam- 
ple below to see how to create lower case letters on 
your printer. 

10 J$ = "MY BUll FRIEND'S NAME IS JONNY" 

20 PRINT #-2,J$ 
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Make sure your printer is on and ON LINE. Now type 
RUN, and on your printer it should say, 

My best friend's name is Jonny. 

The only two letters that should be capitalized are 
the M in "My" and the J in "Jonny." To get lower case 
letters, press SHIFT <ZERO>. Instead of being black 
on green, the display is green on black. That's how you 
can tell if it is going to print upper or lower case on your 
printer. After you enter SHIFT <ZERO>, all the letters 
will be in lower case until you hold down the SHIFT key 
and press a key. The SHIFTED key makes it upper case. 
When you press SHIFT <ZERO> again, everything will 
be in upper case. 

Our next program is a simple one to turn your printer 
into a typewriter. When you RUN the program it will 
clear the screen and put a question mark on the left side 
of the screen. Type in messages, and every time you hit 
ENTER, the text will be printed to your printer. Be sure 
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not to put in too many letters — about 200 — before you 
press ENTER. You can use it to write letters to your 
friends. When you are finished, press "#" when the 
question mark appears and the program will end. 
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KID PROCESSOR 



10CLS 

20 INPUT S$ 

30IFS$ = "#"THEN END 

40 PRINT 

50 PRINT #-2,S$ 

60 PRINT #-2 

70 GOTO 20 



^ 




In this chapter you have learned how to make a 
printout of a program, print out sentences on the printer, 
and print out lower case letters on your printer. All you 
have learned in this chapter is how to print a lot of things 
to the printer. In the next chapter, you will learn how to 
do your homework on your computer. 
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ON THE COMPUTER 



In this next chapter we'll show you how you can do 
your homework, so even your parents will want you to 
use your computer when doing homework. You say 
that's impossible!! Well, type the following program and 
you'll see why that's not impossible. (Note: Where you 
see periods in the program listing, put spaces.) 




^ 
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10CLS 

20 PRINT© 102, "COCO MATH FUNCTIONS" 

30 PRINT 

40 PRINT" <1>.. ADDITION" 

50 PRINT " <2> . . SUBTRACTION" 

60 PRINT " <3> . . MULTIPLICATION" 

70 PRINT" <4>.. DIVISION" 

80 PRINT" <5>..QUIT" 

90 PRINT@ 422, "PICK A FUNCTION "; 

100 INPUT A 

110CLS 

120 IF A = 1 THEN AS = "ADDITION": GOTO 210 

1 30 IF A = 2 THEN AS = "SUBTRACTION" : GOTO 21 

140 IF A = 3 THEN A$ = "MULTIPLICATION": GOTO 210 

1 50 IF A = 4 THEN AS = "DIVISION" : GOTO 210 

160 IF A = 5THEN END 
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170 GOTO 10 

180 REM *** 

1 90 REM *** START OF MAIN ROUTINE *** 

200 REM *** 

210PRINT@ 106, A$ 

220 PRINT 

230 PRINT "ENTER THE FIRST NUMBER "; 

240 INPUT B 

250 PRINT "ENTER THE SECOND NUMBER "; 

260 INPUT C 

270 REM*** 

280 REM *** FIND OUT WHICH MATH FUNCTION 

WANTED AND D=ANSWER *** 
290 REM*** 

300IFA = 1 THEN D = B + C 
310IFA = 2THEN D = B-C 
320 IF A = 3THEN D = B* C 
330 IF A = 4 THEN D = B / C 
340 PRINT 

350 INPUT "WHAT IS YOUR ANSWER "; A 
360 IF A <> D THEN 420 : REM *** CHECK IF 

YOUR WRONG *** 
370 PRINT'YOU'RE RIGHT !" 
380 PRINT 

390 INPUT "DO YOU WANT TO TRY AGAIN "; AS 
400 IF A$ = "Y" OR A$ = "YES" THEN 10 
410 CLS: END 

420 PRINT "SORRY, THE ANSWER IS "; D 
430 GOTO 380 



You should notice that the program is very short. We 
thought there would be no need to write four almost 
identical programs. We could have made the program 
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out of three main GOSUB routines combined into one 
main program, but instead we did it a little differently. 

Line 2 1 is the start of the main routine that asks for m 

both numbers. You can also refer to the numbers as the g 

NUMERATOR, which is the top or first number, and the © 

DENOMINATOR, which is the bottom or last number. ^ 



a 100% on your next test, provided that you study with 
the program. 



(c» 



This really isn't too important here, but good to know. 

Mom and Dad should really appreciate a program such ^ 

as this, especially since it wasn't available when they || 

were in school. If you want to be a real wiz kid, why don't C9 

you try to make a spelling bee program? It will guarantee ^ 
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Have you ever wished you could be a fancy typist? 
And have great looking school reports? Well, wish no 
more. The power is right at your fingertips (with the help £i3 

of your color computer). Most computers have the i=l 

capabilities to use a word processor. For the color com- © 

puter there are several different ones to choose from. g 

Here are just a few: Color Scribe by Computerware, g 

Telewriter-64 by Cognitec, and Text editor by Elite ^ 

Software. All of these are excellent word processors. || 

Color Scribe and Telewriter-64 were used in the making 

of this book. Word processors (W/P) are generally very H 

easy to use and understand. This is called being User H 

Friendly. The W/P will allow you to do such things as 
realign text. What this means is it will either fill in or take 
out text and insert it elsewhere to properly align the 
text. 
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Example* 



This is a dictionary definition of the word Computer: 
a programmable electronic device that can store, 
retrieve, and process data. 

Definition of the word Memory: for a computer it 
can be inserted and stored and from which it may be 
extracted when wanted; for example, 16K bytes is 
equal to 16384 (16 X 1024) pieces of information. 



After using the align function * 



* * 
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This is a dictionary definition of the word Computer: 
a programmable electronic device that can store, re- 
trieve, and process data. 

Definition of the word Memory: for a computer it can 
be inserted and stored and from which it may be ex- 
tracted when wanted; for example, 1 6K bytes is equal to 
16384 (16 X 1(324) pieces of information. 

There certainly is quite a difference from the non- 
aligned definitions to the aligned defintions. Of course 
this is a little exaggerated but shows you a point about 
the align function. We'll now give you a short list of 
functions that most W/P have for writing letters, docu- 
mentation, and other written materials: 
<1 > Word Wrap; when at the end of a line and you are 

still typing a word, the Word Wrap function will 

bring the entire word down to the next line. 
<2> Block Delete; will delete a block of text that you 

do not want. 
<3> Copy Block; will copy a block of text and place it 

where indicated by the user. 
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<4> Line Delete; delete a single unwanted line. « 

<5> Find; the W/P will find the character you indicate. Q 

<6> Global; searches for a character and replaces it. ^ 

<7> Save; save text to tape or to disk. || 

<8> Load; load text from tape or disk. £$ 

<9> Append; tacks on a file of text to the end of the tj 

existing file in memory, (combining letters) © 

<10> Print; prints out the file in memory to a printer. g 



WRITTEN ASSIGNMENTS 
ON A WORD PROCESSOR 
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Whenever we're given a written assignment like a a 

report or grammar homework, after we write the assign- ^ 

ment, our parents go over it and check spelling and ^ 

English. Then we have to write the whole thing over © 

again. With a word processor, though, it's really simple. ^ 

All we have to do is to go back and change the mistakes, g 

and then send it to the printer. The printer will do it as ^ 

many times as you want until it's correct. You don't have j=| 

to re-type anything except the mistakes. It helps you " 

concentrate on correct grammar and spelling instead of || 

all the work in re-doing the whole paper. Also, when the H 
paper is turned in, it looks much better and clearer than 
a hand-written assignment. 

There are many, many more such commands as ^ 

these that will enable you to produce great looking H 

material. Through practice you will find that the word © 

processor can be a very useful tool in doing just about ^ 
anything. 
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OUR FAVORITE 
PROGRAMS/GAMES 

In this chapter we'll discuss different companies' 
products for the Color Computer and other material 
related to it. We'll also describe a few games and then 
give a listing of the most popular games to date. 

Have you ever wanted to explore a strange house 
and encounter black magic? If so, BLACK SANCTUM is 
for you. This adventure game is quite fun and tough to 
beat, but with time you should conquer the evil that 
dwells there. Another excellent game is PYRAMID. 
Both of these games are from Mark Data Products and 
are each under $20.00. There are many more adven- 
ture games also available from different companies. If 
you want more information, look in a few Color Com- 
puter magazines. 

Next we'll describe some fast action arcade type 
games. If you think it would be nice to be a space warrior, 
then ZAXXON is, of course, for you. ZAXXON is a game 
developed by Steve Bjork from Datasoft Inc. You first 
start out flying around empty space for a bit, then you 
come up to an island that has walls all around it. All of a 
sudden you see a base tank fire laser shots at you, so you 
respond by blowing it up first (you hope). After lots of 
shooting you come face to face with the robot Zaxxon. 
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This guy is a toughy, but he can be destroyed. After a 
while the game repeats and gets a little tougher each 
time. This game has just about everything the arcade 
ZAXXON has and more. 

Another game that is very good is THE KING by 
Tom Mix Software. This game again is almost exactly 
like the real arcade game. There are four different kinds 
of mazes — the beams, the pegs,the elevator, and the 
q pie factory. The graphics are very colorful and the pro- 

gram very well done. 

„ DEFENDER by Fishertronics is another awesome 

l=i game with excellent graphics much like the real arcade 

^ game by Williams Electronics. TRAPFALL by Tom Mix 

H Software is much like PITFALL from the ATARI ACTI- 

g VISION cartridge but it is better. If you like PITFALL, 

q you will love TRAPFALL. 

t 3 BERSERK by Tom Mix Software is very similar to the 

H real arcade game as well. You travel through mazes try- 

II ing to destroy every robot in sight. Watch out, beware of 

^ Evilotto. He is indestructible. Another creative game is 

GHOST GOBBLER from Spectral Associates. This is a 
very good PAC-MAN style game. It has very good 
graphics much like the arcade game. Eat your way 
through mazes, but watch out for the ghost monsters. 
LANCER from Spectra! Associates is a great game, too. 
This is like the arcade game, JOUST. You try to hit flying 
men on great flying birds. Watch it, if you don't keep on 
flapping you may fall into the hot molten lava below. 
COLORPEDE by Intracolor is almost exactly like the 
^ arcade game CENTIPEDE. You are trapped in a kind of 

=3 maze of mushrooms, spiders, fleas, scorpions, and the 

55 dreaded COLORPEDE. The spiders make you nervous 
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and take away mushrooms. If you shoot too many ^ 

mushrooms, a flea will come down and make more of ^ 
them. The scorpions will hit mushrooms and make them 
poisonous and if the COLORPEDE hits the mushroom, 
the COLORPEDE will come straight down and turn just 

before it hits the bottom of the screen. ^ 

A game that has excellent graphics and is very well q 

written is ASTROBLAST by Mark Data Products. This - 

game is like the arcade game. You travel through space « 

destroying enemy ships and try to get reloaded with fuel g 

by shooting the mother ship. This game is very good. ^ 

The last, but not least, game is THE FROG by Tom Mix © 

Software. This game is like the arcade game FROGGER ^ 

by Sega. Hop across the road avoiding cars, hop onto || 

logs and turtles, and beware of the crocodile. These are @3 

just a handful of Color Computer games that are g 

available. ^ 

H 

*** Aardvark Software *** Q 

Wizards tower ® 

Golf g 
Haunted House 

Quest H 

Venturer § 
Dungeons of Death 

*** Computerware *** eg 

Doodle Bug H 

Moon Hopper $$ 

Grand Prix c^ 

Bloc Head © 
Sharks Treasure 
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Pac Attack 
Rail Runner 
Megapede 
Nerble Force 
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*** Cornsoft *** 
Scarfman 

*** Datasoft *** 
Zaxxon 
Moon Shuttle 

*** Elite *** 
Zaksund 

*** Mark Data *** 
Haywire 
Calixto Island 
Space Raiders 
Glaxxons 
Cave Hunter 
Astro Blast 
Black Sanctum 

*** Med Systems *** 
Phantom Slayer 

*** Spectral Associates *** 

Space Invaders 

Space Racs 

Planet Invasion 

Galax Attax 

Ghost Gobbler 
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*** Tom Mix *** 
Trapfall 
Yaazee 

Katerpillar Attack 
The Frog 
Space Shuttle 
Protectors 
The King 

To make your Color Computer useful for program- 
ming, companies have made several different tools 
(utilities) for making BASIC programming much easier 
and faster. Utilities include Business, Data Com- 
munications (using the phone line to communicate with 
another computer), Disk Operating Systems and Edu- 
cation. Here is a small list of neat utilities. 
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* * * BUSINESS * * * 

*** Branrex,Inc. COLOR SOFTware Services div. *** 

General Ledger 

Small Business Accounting 

Management Skill 

Accounts Receivable 

Depreciation 

Loan Analysis 

Annuniry 

Expense Account Diary 

Stock Analyzer 
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I *** Cognitec *** 

© Telewriter-64 (Word Processor) 

| *** Computer Systems Center *** 

g Dynacalc 

| *** Computerware *** 

q Color Scribe (Word Processor) 

| *** MPP Graphics *** 

a Stock Portfolio Management 

fr Check Book 

® 

1 *** Softlaw Corp. *** 

^ VIP Calc 

© VIP Database 

h VIP Speller 

| VIP Writer 

I 

^ *** Spectral Associates *** 

P Business Analysis 

| *** Radio Shack *** 

£§ Personal Finance 

q Spectacular 

£a Investment Analysis 

| * * * DAJA COMMUNICATIONS * * * 

§ *** Computerware *** 

f 3 The Color Connection 
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*** Micro Works *** 
Microtext 

*** Softlaw Corp. *** 
VIP Terminal 

*** Eigen Systems *** 
ColorCom/E 

*** Martin Consulting *** 
Colorterm 1.1 
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*** DSL Computer Products *** 
Color DFT 

*** Double Density Software *** 
Color Term +plus+ 






* * DISK OPERATING SYSTEMS & other utilities * * 

*** Arizin *** 

Colorkit (Excellent tool. Has many bells, 

whistles and aids to help program in Basic.) 

*** Eigen Systems *** 
Disk Basic Aid 
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*** Frank Hogg Laboratory *** 

FLEX (Powerful Disk Operating System) 
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Macro-80C (disk based assembler and monitor) 

SDS80C (assembler and monitor) 

Cbug (monitor) 

Source Generator (disassembler) 

*** Softlaw Corp. *** 
VIP Disk-Zap 

*** Prickly-Pear Software *** 

The Disk Manager (recover a crashed disk and more) 
The Disk Master (Speed check, disk map, purge files 
and more) 

*** Tom Mix Software *** 

Disk to Tape 

Tape to Disk 

The Fixer (Converts non-Disk software $060(3, 

to Disk Software) 

* * * EDUCATION * * * 

*** Computer Island *** 

Circus Adventure 

School Maze Adventure 

Reading Aids 4-Pak 

Foreign Language Baseball (Spanish, French, Italian) 

Money-Pak 

Beyond Words 
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*** Radio Shack *** 

Color Computer Learning Lab 

Vocabulary Tutor 

Color Logo 

Color Pilot 

Note: Some Radio Shack Computer Centers offer a 
BASIC computer class for the Color Computer. Check 
at your local computer center for more details. 

*** Spectral Associates *** 

Mathdrill 

Spelling Master 

Typing Teacher 

Geography Pac 

Foreign Language games 

Dollars and Sense 

Circus (help developing reading skills) 

*** Sugar Software *** 
Galactic Hangman 

All of these products are made specifically for the 
Color Computer. The best way to find out more is to 
write to the companies. The easiest way to get their 
addresses is to purchase any number of Color Com- 
puter magazines out. Here is a list of such magazines: 

Rainbow 

Color Computer News 
Color Computer 
Hot CoCo 
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There are also many other TRS-80 Computer maga- 
zines out, and most include programs and material for 
the Color Computer. So there is a great deal of support 
for the CoCo Home Computer if you know where to look. 
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COCO PROGRAMS 

We've filled this chapter with several different types 
of programs for you to learn from and use on your Color 
Computer. There will be some advanced programs, but 
don't worry about understanding them right away. 
Machine language and advanced programming tech- 
niques are used to add speed to some of the programs. 
The programs that have machine language subroutines 
are: 1) Error Sound and 2) Key Stroke. After mastering 
BASIC you may want to move on and look into machine 
language programming or other types of languages. 

The following two programs should give you some 
ideas about how to put together interesting and colorful 
graphics using the low resolution function of the Color 
Computer. The first program shows you the concept on 
using DATA statements for storing graphic images. 
Where there is a 1 the computer will plot (SET) a dot on 
the screen. When there is a the computer skips to the 
next piece of DATA and doesn't plot on the screen. You 
should use the first program to help yourself fully under- 
stand the process of transferring the image to the screen. 
Good Resolutions !!! 
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10CLS0 

20 X = : Y = 8 

30FORH = XTOY ^ 

40 READ PLOT B 

50 IF PLOT = THEN 70 § 

60SET(H,V,5] ,_, 

70 NEXT H © 

80 V = V + 1 ^ 

90IFV<7THEN30 

100 GOTO 100 

500 DATA 0,0,1,1,1,1,1,0,0 ,=} 

510DATA1,1,1,1,1,1,1,1,1 © 

520 DATA 0,0,1,0,1,0,1,0,0 ^ 

530 DATA01, 1,1, 1,1, 1,1,0 § 

540 DATA 0,0,1 ,0,1 ,0,1 ,0,0 © 

550 DATA 0,1 ,0,0,0,0,0,1 ,0 g 

560 DATA 1,0,0,0,0,0,0,0,1 ® 



* * * * * * 

10CLS0 

20 PRINT® 459, "INVASION"; 

30 X = : Y = 8 : REM *** FIRST COORDINATED « 

FOR INVADERS*** 
40 REM *** 

50 REM *** PRINT THE INVADER *** 

60 REM*** ^ 

70 FOR H = X TO Y 



M 



>=J 



C=3 



80 READ PLOT 
90 IF PLOT = THEN 200 
100SET( H +9, V, C) 
110 SET( H + 9, V + 9, C) 

nsa ®n ©(mnsfl ©n scainsi ©jl sojnso ©jl ©cmosi ©a ©misd ©jl S(Sisq ©jl scmosa @jl ©(odisq ©jl ©arose ©jl scmnsn ©jl s<m 
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1=3 



E=* 



E=" 



§=> 



&== 



120SET( H, V + 9, C) 

130SET[ H, V, C) 

140SET( H + 18, V, C] 

150SET( H + 18, V + 18, C] 

1B0SET[ H, V + 18.C) 

170SET( H, V, C J 

180SET[H +9, V + 18, C) 

190 SET [ H + 18, V + 9, C] 

200 NEXT H 

210V = V + 1 

220 IF V<7THEN 70 

230 H = : V = : RESTORE 

240 C = C + 1 : REM *** INCREASE COLOR *** 

250 IF C = 9 THEN C = 

260X = 31 :Y = 39: REM*** SECOND COORDINATED 

FOR INVADERS*** 
270 GOTO 70 
280 REM *** 

290 REM *** DATA FOR INVADER *** 
300 REM *** 

500 DATA 0,0,1,1,1,1,1,0,0 
51 DATA 1, 1,1, 1,1, 1,1,1,1 
520 DATA 0,0,1,0,1,0,1,0,0 
530 DATA 0,1,1,1,1,1,1,1,0 
540 DATA 0,0,1,0,1,0,1,0,0 
550 DATA 0,1 ,0,0,0,0,0,1 ,0 
560 DATA 1,0,0,0,0,0,0,0,1 
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This program is another one of those shoot 'em up 
games that consists of a base (you) and the flying saucers. 
The game is somewhat crude but it shows that it is pos- 
sible to have a fun action game in Color Basic. You may 
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change the characters of the base and of the ships by 
modifying the strings to different character values. (Look 
in the back of your Color Basic manual, pg. 276, to 
calculate your own character code.) A$(1 ) - A$(4] are 
the string arrays for the ships, and B AS E$ is for the base. 
To play the game, use the right and left arrow keys to 
move and the space bar to shoot. 

10CLS 

20BASE$3CHR$(143] + CHR$[199] + 

CHR$[207) + CHR$(203) + CHR$(143] 
30A$[1) = CHR$(143) + CHR$(183) + 

CHR$(187) + CHR$(143] 
40 A$[2] = CHR$[143] + CHR$(!90) + 

CHR$(1B9) + CHR$(143] 
50A$(3) = CHR$(143) + CHR$(183) + CHR$(191] + 

CHR$(187] + CHR$(143j 
60A$[4) = CHR$(143) + CHR$(195) + CHR$(195] + 

CHR$(195) + CHR$[143) 
70 LEVEL = RND(8] : T = T + 1 
80 IF T = 25 THEN 470 
90 SHIP = RND(4) 
100 ON RND(2) GOTO 110, 180 
1 1 FOR L = TO 26 STEP RND[3) 
1 20 PRINT@ LEVEL * 32 - 32 + L ," "; A$[SHIP]; " "; 
130GOSUB230 

140 PRINT@ 448 + ADD, BASES; 
150 NEXT L 

1B0 PRINT© LEVEL* 32 -31," "; 

170 GOTO 70 

1 80 FOR L=26 TO STEP -(RND(3)] 
190GOSUB230 
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g 200 NEXT L 

n 210 PRINT© LEVEL* 32 -31," "; 

P 220 GOTO 70 

& 230 IF PEEK(344] = 247 THEN ADD = ADD + 1 

H| : IF ADD > 28 THEN ADD = 28 

S 240 IF PEEK(343) = 247 THEN ADD = ADD - 1 

© : IF ADD < 1 THEN ADD = 1 . 

^ 250IFPEEK[345] = 247THEN290 

g 260 PRINT© LEVEL * 32 - 32 + L, " "; A$(SHIP); " "; 

m 270 PRINT@ 448 + ADD, BASES; 

^ 280 RETURN 

290 FOR FR = 1 3 TO LEVEL - 1 STEP - 1 

300 WH = FR * 32 + ADD + 2 

31 PRINT@ WH, CHR$(1 28) 

320 PRINT@ WH, CHR$(143) 
" 330 NEXT FR 

P 340 CO = CO + 1 

B 350 LV = LEVEL* 32 -32 + L + 4 

Q 360 FOR XX = 1 TO 3 

@ 370 IF WH- 3 +XX = LVTHEN430 

© 380 NEXT XX 

E=> 390 FOR XX = 1 TO 3 

© 400 IF WH- 2 + XX= LV THEN 430 

1 410 NEXT XX 

^ 420 GOTO 260 

© 430 SOUND 236, 1 

& 440 PRINT® LEVEL* 32 -31," "; 

g 450NH = NH+1 

g 460 GOTO 70 

^ 470 FOR A = 1 TO 5 

480 SOUND 45, 1 : SOUND 95, 1 

490 NEXT A 



fr 
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This next program will turn your screen into inverse 
colors. Let's say you have an opening title to a pro- 
gram — this short program would turn all that's on the 
screen to inverse characters. Then, if you wanted, you 
could change the screen back to normal display. 



t® mws> tt® mums t® mms> t® wms> t® msm if© 



500 CLS 

510 PRINT "SHOTS FIRED="; CO 

520 PRINT "NUMBER HIT="; NH 

530 PRINT "SHIPS MISSED="; T - NH 

540 PRINT 

550 PRINT "DO YOU WANT TO PLAY AGAIN"; 

560 INPUT B$ 

570 IF B$ = "Y" OR B$ = "YES" THEN RUN 

580 PRINT " CHICKEN" : END 






^ 



10 CLS 

20 PRINT "THIS PROGRAM WILL EITHER TURN THE 

SCREEN INVERSE OR BACK TO" 
30 PRINT "NORMAL. THIS WOULD BE GOOD FOR " 
40 PRINT "THE OPENING TITLES OF YOU " 
50 PRINT "OWN PROGRAMS" 
60 PRINT@ 360, "INVERSE/NORMAL" 
70 PIC = : REM *** INVERSE *** 
80GOSUB 10000 
90 PIC = 1 : REM *** NORMAL *** 
100GOSUB 10000 
110END 
10000 FOR D = 1024 TO 1535 : REM *** BEGING 

SCREEN ADDRESS AND ENDING SCREEN 

ADDRESS*** 
10010A = PEEK(D) 
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10020 IF PIC = 1 THEN GOSUB 10060 ELSE 

GOSUB 10080 
10030 POKE D, B 
10040 NEXT D 
10050 RETURN 
10060B = AOR64 
10070 RETURN 
100B0B = AAND 191 
10090 RETURN 



The program that follows is one dealing with the 
advanced topic of machine language. This program will 
give you an audio response when any of the keys on the 
keyboard have been hit. The program will stay in memory 
until the machine is turned off, and you will still be able 
to use BASIC. 



10CLS 

20 PRINT@ 1 1 , "KEY SOUND" 

30 PRINT@ 64, "THIS PROGRAM WILL 

MAKE AN AUDIO"; 
40 PRINT "TONE WHEN ANY OF THE KEYS ARE' ! 
50 PRINT "HIT ON THE KEYBOARD" 
60 I = PEEK(39] * 256 + PEEK(40) - 75 
70 CLEAR 500,1 

80 I = PEEK[39] * 256 + PEEK(40) + 1 
90 FOR B = ITO I +70 
100 READ D 
110 POKE B.D 
120 NEXT B 
130 EXEC I 
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140 POKE 157,180: POKE 158,74 : NEW 

150 REM *** 

1 60 REM *** DATA FOR *** *** KEY PRESS *** 

170 REM*** 

1 80 DATA 52, 63, 32, 3, 1 26, 0, 0, 1 90, 1 , 1 07, 

49, 1 40, 248, 1 75, 1 64, 48, 1 41 
190 REM*** 
200 REM *** 
21 DATA 0, 5, 1 91 , 1 , 1 07, 53, 63, 52, 63, 1 34, 

63, 183,255,35,48, 141,0 
220 REM *** 
230 REM *** 
240 DATA 33, 1 6, 1 42, 0, 8, 230, 1 28, 1 93, 0, 39, 

19,31, 152,247,255,32, 18 
250 REM *** 
260 REM *** 
270 DATA 1 8, 1 8, 92, 38, 247, 31,137, 49, 63, 38, 

241,32,227,53,63,32, 192,69, 149,0 
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^ 



Again, here is another machine language (M/L) pro- 
gram. This program is just like having power windows in 
your new Cadillac. It's nice to have, but you can live 
without it. Have you ever typed in a command, such as 
CLOADM, turned away to check on something else, 
and come back to find nothing has happened but an 
?SN ERROR? The following routine will give you a sort 
of "bouncing bonging" sound when you happen to get 
any type of error. This program will also stay in memory 
until the computer is turned off or until you type POKE 
1 1 3, SandhittheRESETbuttononthebackofthe com- 
puter. (CAUTION: The POKE and hitting RESET will 
wipe out any BASIC program in the computer.) Both the 
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256 + PEEK(40) + 1 
+ 104 
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key sound and the error sound routines are completely 
compatible with each other. This means it is possible to 
have both programs in memory at the same time and 
have them operate properly together. 

10CLS 

20 PRINT@ 10, "ERROR SOUND" 

30 PRINT© 64, "THIS PROGRAM WILL GIVE YOU AN" 

40 PRINT "AUDIO DETECTION OF A SYNTAX" 

50 PRINT "ERROR OR ANY OTHER TYPE OF ERROR" 

60 I = PEEK(39) * 256 + PEEK(40) - 1 1 

70 CLEAR 500, I 

80 I = PEEK(39) : 

90 FOR B = I TO 

100 READ D 

110POKEB.D 

120 NEXT B 

130 EXEC I 

140 POKE 157,180 

150 PRINT 

160 PRINT" DONE 

170 NEW 

180 REM *** DATA FOR *** 

190 REM*** SOUND*** 

200 REM *** *** 

210 DATA 52, 63, 32, 3, 1 26, 1 7, 1 48, 1 90, 1 , 1 43, 

49, 140,248, 175, 164,48 
220 DATA 1 41 , 0, 5, 1 91 , 1 , 1 43, 53, 63, 52, 63, 

134,63, 183,255,35,48 
230 DATA 141,0, 33, 1 6, 1 42, 0, 8, 230, 1 28, 1 93, 0, 

39, 19,31, 152,247 
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POKE 158,74 



ERROR *** 
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240 DATA 255, 32, 1 8, 1 8, 1 S, 92 

250 DATA 38, 247,31, 137,49,63,38,241,32, 227, 

53,63,32, 192,255, 16 
260 DATA 229, 21 , 224, 37, 208, 53, 1 92, 69, 208, 

85, 240, 32, 224, 48, 208 
270 DATA 48, 1 92, 64, 1 76, 96, 1 60, 1 1 2, 1 44, 

128, 144, 160, 165 
280 DATA 1 76, 1 81 , 1 92, 1 97, 208, 224, 229, 



g 



E=> 



§=■ 



i 






10 CLEAR 500 : C = 1 : DIM A$(255] 



20A$(1 
30 A$(2 
40 A$(3 
50 A$(4 
60A$(5 
70A$[6 
80 A$[7 
90 A$(8 



"COLOR COMPUTER" 
"COLOR HANG MAN" 
"MAX CHARACTERS IN" 
" ONE LINE" 
"IS '57' AND YOU MAY" 
"HAVE AS MANY MESSAGES" 
"AS YOU WANT. 0-255" 
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This next program is one of those games that most 
everyone can enjoy. May they be 9 or 90, everyone likes 
Hang Man. The program can have up to 255 different 
messages up to 57 characters long. The program is long 
but well worth the effort of typing it in. You can have 
friends or family type in different messages and save 
them to Tape or Disk. Later you can come back and try 
to guess the messages left by them. Enter all messages 
between quotation marks in the A$( ) array, changing 
the ones in the listing if you like. For example, you might 
want to change A$(l) to equal "microcomputer" or add 
A$(200) to be "arithmetic". Well, have fun and don't get 
HUNG up. 
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1 00 A$(9] = " " 
110A$(10) ="" 
120CLS0 
130GOSUB520 
140 A = LEN(A$(C)) 
150USED = 41B 
160 SEN =448 
170 PRINT© SEN, "SENT:"; 
180 FOR B = 1 TO A 
190D$ = RIGHT$[ A$(C),B) 
200 D = ASC( D$ ] 

21 IF D = 32 THEN PRINT@ SEN + 5 + A - B, " "; 
: T = T + 1 ELSE PRINT@ SEN + 5 + A - B, "-"; 
220 NEXT B 

230 PRINT@ USED, "USED:"; 
240 PRINT@ 180, "LETTER"; 
250Z = 
260 INPUT AN$ 

270 IF AN$ = "" THEN GOTO 240 
280 FOR B = 1 TO A 
290 D$ = RIGHT$( A$(C) ,B ) 
300 D = ASC( D$ ] 
310 AN = ASC( AN$] 
320 IF AN = D THEN GOSUB 370 
330 NEXT B 

340IFZ< > 1 THEN 450 
350 PRINT® 186,""; 
360 GOTO 240 
370 FOR F = 1 TO A 

380IFPEEK(1024 + SEN + 5 + A-B] = ANTHEN240 
390 NEXT F 
400 PRINT@ SEN + 5 + A - B, CHR$( AN ]; 
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410T=T+1 ^ 

420 IF T = ATHEN GOTO 1570 § 

430 Z = 1 a 

440 RETURN « 

450PRINT@ USED + 5, CHR$( AN]; § 

460 USED = USED + 1 ^ 

470 ON USED-41 6 GOSUB 600,740,820,870,920, © 

970,1020,1070,11201170,1200, ^ 

1270,1320,1350 H 

480 GOTO 240 © 

490 REM*** g 

500 REM *** POLE *** ^ 

510 REM*** H 

520 FOR Y = 21 TO STEP -1 : SET(2,Y,7] : NEXT Y g 
530 FOR X = 3 TO 1 8 : SET(X,0,7) : NEXT X 
540 POKE 51 2, C 
550 RETURN 
560 REM*** 
570 REM*** HEAD*** 
580 REM*** 
590 SOUND 56,5 

600SET(18,1,5) ^ 

610 FOR X = 16 TO 20: SET(X,2,4] : NEXTX g 

620 FOR X = 1 5 TO 21 : SET(X,3,4) : NEXT X 63 

630 SET(1 4,4,5] : SET[22,4,5) c=j 

640SET[1 3,5,5] : SET[1 4,5,5] : SET(22,5,5] : SET(23,5,5] © 

650SET(1 2,6,5] : SET[1 4,6,5] : SET(22,6,5] : SET(24,6,5] g 

660SET(13,7,5):SET(14,7,5]:SET(22 > 7 > 5]:SET(23 1 7,5] M 

670 SET(1 4,8,5] : SET(22,8,5) © 

680 SET{1 5,9,5) : SET(21, 9,5] g| 

690 FOR X = 1 6 TO 20 : SET(X,1 0,5) : NEXT X ° 

700 RETURN § 
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§ 710 REM*** 

a 720 REM *** BODY*** 

M 730 REM*** 

© 740 SET(1 8,11,6) 

§ 750 FOR X = 1 5 TO 21 : SET(X,1 2,6] : NEXT X 

g 760 FOR Y = 1 3 TO 1 7 : SET(1 4,Y,6] : SET(22,Y,6] : NEXT Y 

Q 770 FOR X = 1 4 TO 22 ; SET[X,1 7,6) : NEXT X 

E=> 780 RETURN 

g 790 REM*** 

B 800 REM *** RIGHT ARM *** 

^ 810 REM*** 

g 820 SET(1 3,1 3,5) ; SET[1 2,1 2,5] : SET(1 1,1 1 ,5] 

6=3 830 RETURN 

8 840 REM*** 

g 850 REM *** LEFT ARM *** 

33 860 REM*** 

P 870 SET(23,1 3,5] ; SET(24,1 4,5) : SET(25,1 5,5) 

m :SET(26,14,5) 

g 880 RETURN 

f| 890 REM*** 

q 900 REM *** RIGHT LEG*** 

P 910 REM*** 

© 920 FOR Y = 18 TO 19 ; SET(17,Y,5] ; NEXTY 

g 930 RETURN 

^ 940 REM *** 

© 950 REM *** LEFT LEG*** 

*=■ 960 REM*** 

970 FOR Y = 1 8 TO 1 9 : SET[1 9.Y.5) : NEXT Y 

980 RETURN 

990 REM*** 

1000 REM *** RIGHT HAND *** 

1010 REM *** 
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1 020 SET(1 0,1 0,4) : SET[9,1 1 ,4) 

:SET(1 1,9,4] :SET{9,9,4) 
1030 RETURN 
1040 REM*** 

1050 REM *** LEFT HAND *** 
1060 REM*** 
1070SET(27,13,4) : SET(28,14,4) : SET(2B,12,4) 

: SET(28,12,4] 
1080 RETURN 
1090 REM *** 

1 1 00 REM *** RIGHT FOOT *** 
1110REM*** 

1 1 20 SET(1 5,1 9,5) : SET(1 6,1 9,5) 
11 30 RETURN 
1140 REM*** 

1 1 50 REM *** LEFT FOOT *** 
11 60 REM *** 

1170SET[20,19,5] :SET(21,19,5) 
11 80 RETURN 
11 90 REM *** 

1200 REM*** RIGHT EYE*** 
1210REM *** 
1 220 SET{1 6,5,3) 
1230 RETURN 
1240 REM *** 
1250 REM*** LEFT EYE*** 
1260 REM *** 
1270SET[20,5,3) 
1280 RETURN 
1290 REM*** 
1300 REM *** NOSE*** 
1310REM *** 
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t=3 
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1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1430 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 

1620 



SET[1 8,6,8) 

RETURN 

REM *** 

REM *** MOUTH *** 

REM *** 

SET(1 7,8,4] : SET(1 8,8,4] : SET(1 9,8,4] 

SOUND 78, 8 

FOR A = 1 TO 70: NEXT A 

SOUND 78,8 

FOR A= 1 TO 70: NEXT A 

SOUND 78, 3 

SOUND 78, 5 

SOUND 108,8 

SOUND 99, 4 

SOUND 99, 4 

SOUND 78,5 

SOUND 78, 5 

SOUND 69, 5 

SOUND 78, 5 

FOR A = 1 TO 463 * 3 : NEXT A 

CLS 

PRINT "YOU'RE HUNG!" 

PRINT: PRINT 

PRINT "THE ANSWER IS: ";A$(C] 

GOTO 1610 

FOR A = 1 TO 436* 6 : NEXT A 

CLS 

PRINT 

PRINT "GOOD WORK!!!" 

PRINT© 1 28, "DO YOU WANT 

TO TRY ANOTHER"; 

INPUT A$ 



^/> 
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This last program wil! help you quickly look up the 
names and addresses of your friends. All you have to do 
is put their names and addresses into the DATA state- 
ments beginning on line 200 as the example shows. Be 
sure to have DATA for all five string variables ( N A M ESS, 
AD$, CITYS, S$, and ZIPS). If you ask it for a name it 
cannot find, the program will eventually find EN D in the 
DATA statement in line 1 000. At that point the program 
will quit. So be sure to spell the names correctly when 
you RUN the program. (PSST... Do you want to add the 
phone number? Just add line 85 READ PHS and add 
the phone number to the DATA statements. You figure 
out the rest.) 



1630 IF A$ = "YES" OR A$ = "Y" THEN CLEAR 

: C = PEEK(51 2] + 1 : POKE 51 2, C : GOTO 20 
1640 PRINT: PRINT 
1 650 PRINT "OK. GOOD BYE." 
1660 END 
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i fn r i- iv/i ************************ 
20 REM NAME AND ADDRESS 

00 ppiwi ************************ 

40CLS 

50 INPUT"ENTER NAME TO FIND";N$ 

60 READ NAMES : IF NAMES = "END" THEN END 

70 READ ADS : READ CITYS 

80 READSS : READ ZIPS 

90 IF NAMES = N$ THEN 100 ELSE 60 
1(71(71 RFIVI ***************************** 

110 REM PRINT THE INFORMATION 

1 P(7I RFM ***************************** 
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130CLS 

140 PRINT NAMES 

150 PRINT ADS 

1 60 PRINT CITYS;", ";S$;" ";ZIP$ 

170 FOR V = 1 TO 4 : PRINT: NEXT 

180 INPUT "ANOTHER(Y/N) "; ANS 

190 IF AN$ = "Y"THEN 50 

P(/1l7i RFIV/I ************************** 

210 REM RECORD INFORMATION 

PPI7I RF KA ************************** 

230 DATA KATHY SMARTS, 6809 DIGITAL CT., 

SILICONE, CA, 92129 
240 DATA KARL COMPUTE, 1024 MICRO BLVD, 

OPCODE, IOWA, 12345 

P'SfTJ RPI\/l *************************** 

260 REM JUST KEEP ON ADDING 
270 REM NAMES AND ADDRESSES 
280 REM BETWEEN HERE AND 
290 REM LINE 1000. 



300 REM 

1000 DATA END 



That ought to give you plenty of programs you can 
use. See if you can invent some of your own programs. 
In the next chapter, we'll tell you how you can have even 
more statements to help you program with Extended 
BASIC. 
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EXTENDED COLOR BASIC 

By now you should know that your Color Computer 
is not a toy nor an arcade game with a keyboard. If you 
have just regular Color BASIC, you have a very powerful 
computer; but if you have Extended Color BASIC, you 
have a super powerful computer with some advanced 
features. Most people who buy the Color Computer 
start out with Color BASIC first. Then they realize that it 
sure would be nice to tap into the superb graphics and 
the great sounds that can be produced by having the 
Extended chip. Extended BASIC may be purchased 
from your Radio Shack computer center, or there are 
certain places that sell them in a kit. The cost is between 
$99- $120. Radio Shack includes the warranty installa- 
tion. (If you know something about hardware, though, 
the Extended BASIC chip is easy to install.) 

Here we'll discuss the major abilities of Extended 
BASIC. If you want a complete list of all the. Extended 
keywords (statements, functions, etc.), use the Red fold- 
out card that came with your computer. 

EDITING WITH EXTENDED BASIC 

Have you ever typed in a line and found out that you 
had an error or misspelled a word? Well, we can say we 
definitely have. Normally you would have to retype the 
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whole line over again, but not if you have the EDIT func- 
tion that's in Extended BASIC. The EDIT function will 
allow insertion of new characters, deletion of unwanted 
characters, and searching for characters. For example, 
suppose you had the following line: 



40 FOR X 1 TO 50 : PRINT X : NEXT X 



You forgot to put in the = (equal sign) between the 
first X and the 1 . To change that with the EDIT function, 
you would enter: 



EDIT40<ENTER> 



!=, 



t=3 



The line will appear on your screen, and as you press 
the space bar the line will begin to appear. When you get 
to the X, press the "I" key (for insert) and enter the equal 
sign. Press ENTER, and your line will be edited. That's a 
lot simpler than re-writing the entire line. 

There are a few other commands of the editor, but 
we wanted you to see how to use EDIT specifically. That 
particular function alone is well worth the cost of Ex- 
tended BASIC. 

Would you like to show off your computer or make 
some spectacular graphics? Well with the CIRCLE, 
COLOR, DRAW, GET, LINE, PAINT, PCLEAR, PCLS, 
PCOPY, PMODE, PPOINT, PRESET, PUT.and SCREEN 
functions, you can produce some of the most fascinating 
graphics imaginable. For example, with the statement 
CIRCLE you can draw a circle. The following program is 
an example of how simple it is: 
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10PMODE1.1 UJ 

20 PCLS |f 
30 SCREEN 1,1 

40 CIRCLE (1 00,1 00],50 « 

50 GOTO 50 || 

The CIRCLE requires only that you specify the cen- ti 

ter in terms of X,Y coordinates (100,1(30 in our exam- ^ 

pie), and its radius, 50, in this case. You can include §§ 

other parameters as well to make different colors, begin- (§1 
ning and end as well as its height /width to make ovals. 

The other commands give you equal flexibility in work- |l 
ing with computer graphics. 

Do you want to compose music? Here's your chance || 

to do so with Extender's PLAY command. It has the ©3 

ability to play five different octaves, flats, sharps and c^ 

variable tempos. These are commands available with © 
PLAY. It can play music with notes that are specified as 
A-G or 1 - 1 2, (V) for 32 levels of volume, (T) how fast the 

tempo is, (O) 1 -5 different sound octaves, (L) for varied ^ 

vote length, (X) allows execution of a substring, and (P) || 
pause. Also, you have the ability to produce flats and 

sharps with the notations of (+ or #) for the sharps and H 

(-) for the flats. @ 

Extended BASIC also has the ability to do complex t=§ 

mathematical calculations not found in the Standard © 

Color BASIC. This pretty well summarizes what Ex- c?3 

tended BASIC can do, and to our feelings no serious H 

Color Computer owner should be without it. ^ 
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* * * GLOSSARY * * * 

ARRAY An arrangement or pattern of data in suc- 
cession, such as a table of numbers. Also a sequentially 
stored set of variables. 

ASCII An acronym forAmericanStandardCode.lt is 
a standard code adopted by most computers to remain 
compatible with others. 



&a BASIC An acronym for Beginner's All-purpose Byrn- 

es bolic Instruction Code. This language is easy to learn 

H and easy to use. 
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BINARY Pertains to the number system with only 
two digits, either 1 or (5. 

BOOLEAN ALGEBRA A portion of logic which is 
similar to algebra, but deals with logical relationships 
not numeric ones. 

BRANCH Alternative directions a program can take. 



Q BUG A mistake in a computer program, or a malfunc- 

^ tion in the computer's hardware. 

& 

j=] CASSETTE A means of magnetic tape storage for 

programs, data, and files. 

m 

% 
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CELL A storage place in the part of memory with the 
capacity to hold only one bit. 

CENTRAL PROCESSING UNIT The main com 
ponent of any computer, the brain of the operations. 
The CPU on the Color Computer is a 6809 micro- 
processor. 

CHARACTER Any letter, number, or symbol stored 
by the computer. 

COBOL An acronym for COmmon Business Oriented 
Language. A high level language for the development of 
complex business programs. 

COMPUTER A device that executes mathematical 
or logical operation without the help of humans. 

COMPUTER OPERATOR A person who knows 
the programming language and is able to operate pe- 
ripheral devices. 

COMPUTER UTILITY A program or device that 
allows the user to gain a better use of the computer's 
functions. 

CRT An acronym for Cathode Ray Tube: The com- 
puter's T.V. or monitor is the CRT. 

DATA The software of the computer; also a vital part 
of the computer's operation. Also a statement in BASIC. 
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DEBUG To find and fix a problem that might exist in a 
program. 

DECIMAL DIGIT A numbering system that is base 
10 and whose numbers include 0, 1, 2, 3, 4, 5, 7, 8, 9. 

DELETE To completely eliminate or remove. 

DIGITAL COMPTER A device that operates on a 
base of ones and zeros. 



P DISK DRIVE A form of storage for programs, files, 

^ data using hard or floppy disks or diskettes. 

g3 DISKETTE The media for the disk drive. 

l=i DOS An acronym for Disk Operating System. 

H EDIT To check, change, or insert data into a program. 

ERROR A problem or bug in a program usually 
caused by the operator of the computer. 

FILES Programs or data that are stored on tape or 
diskette and can be called up again for later use. 

FIRMWARE Software that is permanently stored in 
the computer. Storage media is ROM (Read Only 
Memory). 
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FLOWCHART A diagram that shows the logical © 

operation of a program with the use of various symbols. ^ 

FORTH A high level fast language that uses user H 

defined words to create programs. This language is © 

available for the Color Computer. ® 

FORTRAN An acronym for FORmula TRANslator. „ 

A high level language used primarily for making highly j=j 

complex scientific and engineering computations. || 

c=| 

GLITCH A sudden jump in the AC line voltage or © 

other source voltages that may cause unexpected wipe- ^ 

outs of computer memory. || 

& 

GRAPHICS A mode that allows the computer to |f 
form colorful or complex visual displays and drawings. 
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HARDCOPY A printed copy of the output of a pro- 
gram, listing, or graphic display. 

HARDWARE The physical part of the computer. 

Keyboard, CPU, RAM chips, ROM chips, etc. | 

HEXADECIMAL A numbering system that is on the c=j 

base of 1 6 and whose digits include 0, 1 , 2, 3, 4, 5,6,7 © 

8, 9, A, B, C, D, E, F. S 

1=5 

HOME COMPUTER A small low-cost computer that © 

is generally from $ 1 00.00 to $ 1 000.00 dollars. We think gj 

they were invented so that kids could have a computer ^ 

in their homes. |§ 
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INPUT Inserting information into the computer. 
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& INPUT/OUTPUT Means of sending and receiving 

information such a Disk Drive or Cassette Deck. Usually 
abbreviated as I/O. 

INFORMATION The flow of data from one point 
to another. 
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INTEGRATED CIRCUIT A complex complete cir- 

^ cuit that requires minimal parts to get a desired circuit 

P operation such as a computer. 

©3} 

H I/O An abbreviation for Input Output. 

P3 

q K An abbreviation for kilo or 1 0(30. (Actually refers to 

^ 1(324.) 

©J 

§1 KEYBOARD A group of keys manually operated 

& for inputting information into the computer. 

f 1 KEYWORD A major word element in a program- 
ming language. In BASIC, such words as RUN, FOR, 
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NEXT, GOTO, PRINT are keywords. 

LIGHT PEN An electronic device that allows input to 
the computer by the use of light or darkness on the 
CRT screen. 

LOAD To read in information from an external device 
such as a Disk Drive and/or Cassette Deck. 

©jl q(mm ®jl ©nisi ®n scmnsi ®jl ©smsa ®jl ©cmoso ®jl msm ®jl ©onnsa ®jl msm ®n ©(fflnsc ®jl scmnsa ®jl ©cams 

158 



grass T® msm t® b»s ir® mms T® dsoids t® wiwq t® mito it® bsqe® tt® rass t® mdps it® wms, it® 



WORD A complete word is comprised of eight bits. 
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MEMORY The part of the computer that allows stor- & 

age of programs and data. c=§ 

MICROCOMPUTER A small, low-cost computer ^ 

that is generally used for home, small business use, and || 

is especially made for kids. © 

PASCAL A highly structured programming Ian- © 

guage originally used to help students learn structured H 

programming. (§1 

PROGRAM A set of instructions that guides and ?f 

informs the computer what exactly the user wants to do. tJS 

RAM An acronym for Random Access Memory. The © 

process of obtaining data from or placing data into ® 

storage (memory). j=| 

RUN A single statement for executing a program. 
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SAVE To save information to an external device such © 

as a Disk Drive and/or Cassette Deck. c=3 

Q 

STRING A variable that stores any kind of characters ^ 

generated by the computer in ASCII form. |§ 

SYNTAX The grammatical and base structural laws <=§ 

of a language. " 

WHOLE NUMBER A number without any frac- § 

tional parts; e.g., 12, 45, 54, 99 , not 1-2/3, 4/5. Also & 

referred to as an INTEGER. ^ 
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FOR TH€ RADIO SHACK COLOR COMPUT6R 



UJritten by kids for kids, this unique book explains BASIC programming on the Radio Shack Color Com- 
puter. Created from the idea that kids can teach other kids better than anyone else, the material is 
designed to help you get started using and programming your Color Computer. 

You'll learn how to use the cassette and disk drive, PRINT and math statements, variables, loops, 
branching & subroutines, and arrays. Two chapters are devoted to sound and graphics cind another 
will teach you how to write an original game. Before long, you'll be using your Color Computer to 
finish your homework in record time! 

fls an added bonus, the authors discuss their favorite programs and games. Complete with a com- 
puter glossary and index, KIDS TO KIDS ON TH€ COLOR COMPUTER will teach you the magic of pro- 
gramming in simple, straightforward language. 
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